get WL entities representing two artists:

{dali,matisse}=SemanticInterpretation/@{"salvador dali","henri matisse"}

Salvador Dali
,
Henri Matisse


get artworks by an artist:

getArtworks[artist_]:=DeleteMissing@EntityValue[Take[artist["NotableArtworks"],30],"Image"];
Take[getArtworks[dali],5]

,
,
,
,


build a classifier from these examples

classifier=Classify@AssociationMap[getArtworks,artists]
ClassifierFunction

Method: NearestNeighbors
Number of classes: 2


test the classifier on an Dali artwork it hadn’t seen before:

classifier

Salvador Dali