11
$\begingroup$

Is there a quick and easy way with Graphics to replace the standard data points in a plot with a custom image?

$\endgroup$
13
$\begingroup$

There is a PlotMarkers option in ListPlot:

img = ExampleData[{"TestImage", "Lena"}];
ListPlot[Table[{Sin[n], Sin[2 n]}, {n, 50}], PlotMarkers -> Show[img, ImageSize -> 20]]

enter image description here

$\endgroup$
  • $\begingroup$ Perfect. Thanks! $\endgroup$ – ColtonFisher92 Dec 6 '13 at 3:25
  • $\begingroup$ @Kuba Hmm, good question. $\endgroup$ – halirutan Dec 6 '13 at 9:47
  • $\begingroup$ Table[{{t, 4/5 (Sqrt[1 - t^2] + Sqrt[Abs[t]])}, {t, 4/5 (-Sqrt[1 - t^2] + Sqrt[Abs[t]])}}, {t, -1, 1, .2}] :p $\endgroup$ – Kuba Dec 6 '13 at 10:03
  • $\begingroup$ Awwww so cute @Kuba :D Better with Elaine! $\endgroup$ – Öskå Dec 6 '13 at 11:28

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service, privacy policy and cookie policy

Not the answer you're looking for? Browse other questions tagged or ask your own question.