Wolfram Language™

Cree una galería de poliedros

En ocasiones es útil visualizar un gran número de imágenes al mismo tiempo.

In[1]:=

polyhedra = EntityValue[ EntityValue[Entity["Polyhedron"], "Entities"], {"Name", "Image"}];

Para crear una galería de esas imágenes en la web, usted puede usar GalleryView.

In[2]:=

CloudDeploy[GalleryView[polyhedra[[All, 2]]]]

Out[2]=

Visite usted mismo la galería.

Usted puede mejorar GalleryView agregando títulos.

In[3]:=

CloudDeploy[ GalleryView[<|"Title" -> #1, "Content" -> #2|> & @@@ polyhedra, AppearanceRules -> <|"Title" -> "A bunch of polyhedra"|>]]

Out[3]=

Vea la galería mejorada.