R help - Apr 2008 - reading information

teste2
  theta_chapeu f_estrela k a0 a1 a2 a3
1        3.2            1.2      3  2  1  4   5

>  p<-function(k){
+ i<-1
+  for(i in 1:k){
+  p2=teste2[3+i]}
+ return(p2)}
> > p3-<p(teste2$k)
> p3
  a2
1  4
> p3[1]
  a2
1  4


how i can make an array with the polinomyal function?
lilke p3[1]=1 p3[2]=4 p3[3]=5
tks

	[[alternative HTML version deleted]]

>  p<-function(x){
+  for(i in 1:teste2[k]+1){
+  p2=c+teste2[3+i]*x^(i-1)
+ c=p2}
+ return(c)}
> p3<-p(x)
if i make this i can use a p(x) calling a function in anohter function? no ,
right?

	[[alternative HTML version deleted]]