D(sin(t) ~ t)
D(A*sin(t) ~ t )
D(A*sin(2*pi*t/P) ~ t, A=2, P=10) # default values for parameters.
f <- D(A*x^3 ~ x + x, A=1) # 2nd order partial -- note, it's a function of x
f(x=2)
f(x=2,A=10) # override default value of parameter A
g <- D(f(x=t, A=1)^2 ~ t) # note: it's a function of t
g(t=1)
gg <- D(f(x=t, A=B)^2 ~ t, B=10) # note: it's a function of t and B
gg(t=1)
gg(t=1, B=100)
F <- antiD( A*exp(-k*t^2 ) ~ t, A=1, k=0.1)
F(t.from=-Inf, t.to=0)
F(t.from=-Inf, t.to=Inf)
one = makeFun(1~x&y)
by.x = antiD( one(x=x, y=y) ~x )
by.xy = antiD(by.x(x.from=-sqrt(1-y^2), x.to=sqrt(1-y^2), y=y)~y)
by.xy(y.from=-1, y.to=1)
vel <- antiD( -9.8 ~ t )
pos <- antiD( vel( t.to=t, initVal=v0)~t, Const=50)
pos(0:5, v0=10)
pos(0:5, v0=10, initVal=100)
Run the code above in your browser using DataLab