[R] smooth.spline() fucntion

[array chip]

Hi, all, I found that the smooth.spline() function produces different results between R and S-Plus. I was trying to play different parameters of the function without any success. The script of the function contains Fortran code, so it seems impossible to port the code from S-Plus to R (or I may be wrong). Can anyone suggest anything so that I can produce the same result in R as in S-plus? 

Thanks

John