R Zeichnungsintegral
Ich habe einige Probleme mit der Integrationsfunktion in R. Ich versuche, das Integral vo zu zeichnen, aber es scheint, dass ich es nicht richtig mache.
t <- seq(0, 0.04, 0.0001)
vi <- function(x) {5 * sin(2 * pi * 50 * x)}
vo <- function(x) {integrate(vi, lower=0, upper=x)$value}
test_vect = Vectorize(vo, vectorize.args='x')
plot(t, vo(t)) # should be a cosine wave
plot(t, vi(t)) # sine wave
vo
sollte eine Sinuswelle sein, aber mittest_vect
gibt mir falsche Handlung und mitvo
gibt direkt error 'x' und 'y' Längen unterscheiden sich. Kann mir bitte jemand in dieser Angelegenheit helfen?