(%i1) load(draw);

Result

Příklad: Ověřte, zda množiny:
a) W1 = {[r, 2r, 5r]; r náleží R},
b) W2 = {[r, 2r, r^2]; r náleží R},
c) W3 = {[r, 2r, 1]; r náleží R}
jsou podprostory R^3.

a)

(%i2) W1:[r,2*r,5*r];

Result

(%i3) wxdraw3d(xaxis=true,yaxis=true,zaxis=true,line_width=3,parametric(W1[1],W1[2],W1[3],r,-5,5));

Result

b)

(%i4) W2:[r,2*r,r^2];

Result

(%i5) wxdraw3d(xaxis=true,yaxis=true,zaxis=true,line_width=3,parametric(W2[1],W2[2],W2[3],r,-5,5));

Result

c)

(%i6) W3:[r,2*r,1];

Result

(%i7) wxdraw3d(xaxis=true,yaxis=true,zaxis=true,line_width=3,parametric(W3[1],W3[2],W3[3],r,-5,5));

Result


Created with wxMaxima.