Untitled (3)

>    restart;

>    n:=sqrt(x^2+y^2+z^2);

n := (x^2+y^2+z^2)^(1/2)

>    z:=1;

z := 1

>    plot3d([x/n,y/n,z/n],x=-1..1,y=-1..1,scaling=constrained);

[Maple Plot]

>