文の構造にスタイルを付ける
英文の構造図でテキストに使うスタイルを制御する.
In[1]:=

StringTake[WikipediaData["asteroid"], 250]
Out[1]=

In[2]:=

Style[TextStructure[
"Asteroids are minor planets, especially those of the inner Solar \
System. The larger ones have also been called planetoids."],
FontSize -> 12, FontColor -> White, FontFamily -> "Times", Bold,
Background -> GrayLevel[0.2]]
Out[2]=
