calc_it: calc_it

In wagnius-GmbH/slvwagner: All Stuff that I`m Missing

calc_it

Description

Berechntet die Funktionswerte eines Polynoms für gegebenen Vektor.

Usage

calc_it(seeds, poly, poly_, poly_roots, c_calculation_depth, digits)

Arguments

seeds	complex vector
poly	numeric vector # polynom coefficients
poly_	numeric vector # derivative coefficients of the polynom => deriv(poly)
poly_roots	complex roots vector # roots of the polynom => solve(poly)
c_calculation_depth	#how many iterrations steps (depth of calculation)
digits	how many decimal digit till calculation stop

Examples

polynom <-polynom::polynomial(coef = c(-0.2,-1,1,0,0,1))
roots <- solve(polynom)
seeds <- expand.grid(seq(-2,2, length.out = 200),seq(-2,2, length.out = 200))
seeds <- complex(real = seeds$Var1, imaginary = seeds$Var2)
calc_it(seeds, polynom, deriv(polynom), roots,100,6)

wagnius-GmbH/slvwagner documentation built on Jan. 19, 2025, 7:10 a.m.