Skip to main content
2 of 2
added 60 characters in body
kglr
  • 400.5k
  • 18
  • 488
  • 929
fakedata = Transpose[{Range[500], RandomReal[4000, {500}]}];
ListLinePlot[fakedata, 
 Ticks -> {Automatic, {#, ScientificForm@#} & /@  Range[0., 4000., 1000.]}, 
 PlotRange -> {0, 4500}]

enter image description here

kglr
  • 400.5k
  • 18
  • 488
  • 929