Mathematica.Παράσταση σημείων σε γραφική παράσταση.

[dimitrispk]

Γεια σε όλους,

έχω φτιάξει μία γραφική παράσταση με τη χρήση της εντολής Plot στο mathematica και θέλω να επισημάνω κάποια σημεία, δηλαδή να τα κάνω πιο έντονα και να τονίσω τις συντεταγμένες τους με διακεκομμένες γραμμές στους άξονες x και y.Μπορεί κάποιος να με βοηθήσει σε αυτό;

Παρακάτω παραθέτω και τον αντίστοιχο κώδικα.

Ευχαριστώ

 

Plot[{2 x}, {x, 0, 10}, PlotLabel -> Γραφική Παράσταση, 
 AxesLabel -> {Σοκολάτες, Χρήματα}, 
 Epilog -> {PointSize[Large], 
   Point[{{0, 0}, {1, 2}, {2, 4}, {3, 6}, {6, 12}, {10, 20}}]}, 
 Ticks -> {{0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10}, {0, 1, 2, 3, 5, 10, 12,
     15, 20}}]