Modifying a simple wordcloud graphic example from the Wolfram wiki

Questions
, ,
1

I am trying to nearly copy an example i see from the URL below:

With the small difference of, instead of using a crow, using the output of this graphic as the figure:
Graphics[{Black, CountryData[“Australia”, “SchematicPolygon”]}]

However, things seem to be out of scale, and I cannot ever get the text to form in the shape of the Australia graphic.

It’s never clear to me how one object relates to another in terms of the classic programming OO inheritance tree, etc, so I never know how (or whether) I can use this object as a similar graphic as the crow. Can someone shed some light on what’s going wrong here?

Here’s the code fragment:

Open in Wolfram Cloud ↗
2

Hi Cere,

Try this

polygon = Graphics[{Black, CountryData["Australia", "Polygon"]}];
maskData = ColorNegate[polygon];

backdrop = Image[Graphics[{Black, Rectangle[{0, 0}, {2, 2}]}, 
                   Background -> Black], ImageSize -> {700, 700}];

mask = Image[ImageCompose[backdrop, maskData], ImageSize -> {300, 300}];

text = WikipediaData["frog"];

WordCloud[ToLowerCase@DeleteStopwords@StringTake[text, 1000], mask,
 Background -> Black,
 ImageSize -> 400,
 ColorFunction -> ColorData["SiennaTones"]]

2345plot.png
2345plot.png500×500 37 KB

3

Hi,

Thanks. That almost worked, almost. Still the scale when I run this exact same code seems off compared to what you’re run produced. Can you think of a reason why this would happen? See attached image.

australia.jpg
australia.jpg400×400 6.86 KB

4

I’m running 12.1 .0 Wolfram Desktop on a Mac OSX 10.14 btw.

5

Perhaps due to this unfortunate backwards incompatible change in 12.1. Try setting $ImageResolution = 72.