Plots of y = ln x along with tangent line and the osculating circle of maximum curvature using Maple.
| > |
restart;with(plots);with(plottools); #load plotting packages |
Graph the osculating circle with implicitplot command, store as OP.
| > |
OP:=implicitplot( (x-2*sqrt(2))^2 + (y+(3+ln(2))/2)^2 = 27/4,x=0..6,y=-6..3,color=green,thickness=2): |
Graph the tangent line with plot command, store as TL.
| > |
TL:=plot(x*sqrt(2) - (2+ln(2))/2,x=0..6,color=red,thickness=2): |
Graph the function y = ln x, store as Gr.
| > |
Gr:=plot(ln(x),x=0..6,color=black,thickness=2): |
Draw a radial line segement with line command, store as RL.
| > |
RL:=line([1/sqrt(2),-ln(2)/2],[2*sqrt(2),-(3+ln(2))/2],color=pink,thickness=2): |
Display all these together with the display command.
