In [1]:
using PtFEM, DataFrames, Plots
In [2]:
N(x) = -q * x
Out[2]:
In [3]:
u(x) = q/(2*EA).*(l^2 .- x.^2)
Out[3]:
In [4]:
l = 1.0 # Length [m]
q = 5.0 # Distributed load [N/m]
EA = 10.0 # [Ns/m];
In [5]:
gr()
Out[5]:
In [6]:
x = 0.0:0.1:l;
In [7]:
p = Vector{Plots.Plot{Plots.GRBackend}}(2)
titles = ["EEM fig 1.1 u(x)", "EEM fig 1.1 N(x)"];
In [8]:
p[1]=plot(N(x), x, yflip=true, xflip=true, xlab="Normal force [N]", ylab="x [m]",
fill=true, fillalpha=0.1, leg=false, title=titles[2]);
In [9]:
p[2] = plot(u(x), x, xlim=(0.0, 0.35), yflip=true, xlab="Displacement [m]", ylab="x [m]",
fillto=0.0, fillalpha=0.1, leg=false, title=titles[1]);
In [10]:
plot(p..., layout=(1,2))
Out[10]:
In [11]:
round(u(1/3 * l), 8) == round(4/9 * q * l^2 / EA, 8)
Out[11]:
In [13]:
12*2
Out[13]:
In [ ]: