Hi there I´d like to plot a vectorfield for a force with inverse square of radius dependency, e.g. gravity. From reasons unclear to me the code 
 
d = 10;
r2[x_, y_] = 
 x^2 + y^2 ; VectorPlot[{x/r2[x, y], y/r2[x, y]}, {x, -d, d}, {y, -d, 
  d}, VectorScale -> {Automatic}]
yields this funny result - see pdf.
Help is appreciated, thx 
Herwig
				
					
				
				
					
					
						
							 Attachments:
							Attachments: