Linje på parameterform, parameterkurvor

A=(({{1, 3, 2}, {2, 1, -1}, {1, 1, 0}}))
b=(({{4}, {3}, {2}}))

l[t_]=Transpose[NullSpace[A]]*t+LinearSolve[A,b]

c[t_]={t*Cos[t],t*Sin[t],t}

ParametricPlot3D[
{l[t],c[t]},(* här anges de två parameterkurvorna*)
{t,-10,10},(* vilka värden på parametern som ska plottas*)
PlotStyle-> (* extra kommando som hjälper oss att stajla plotten*)
{{Blue,Thick},{Red,Thick}},(* den första kurvan med blå tjock linje, den andra tjock och röd*)
ImageSize->Large (* gör att plotten blir lite större *)
]