On 17/10/2008, at 7:40 AM, Chernomoretz Ariel wrote:
Hi All,
I need to evaluate a series expansion using Legendre polynomials.
Using the 'orthopolinom' package I can get a list of the first n
Legendre polynomials as character strings.
library(orthopolynom)
l<-legendre.polynomials(4)
l
[[1]]
1
[[2]]
x
[[3]]
-0.5 + 1.5*x^2
[[4]]
-1.5*x + 2.5*x^3
[[5]]
0.375 - 3.75*x^2 + 4.375*x^4
But I can't figure out how to implement functions that could be
evaluated for arbitrary 'x', from this list,
Thanks for your help.
?as.function
methods(as.function)
?as.function.polynomial
foo <- as.function(l[[4]])
foo(3)
cheers,
Rolf Turner
######################################################################
Attention:\ This e-mail message is privileged and confid...{{dropped:9}}
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.