Profile_r_test3_template01

{wiki}Values for X:
min: {$f_$profileobject:r_test_xmin$}
max: {$f_$profileobject:r_test_xmax$}

Those are the results:{/wiki}

{wikiplugin _name=r width="400" height="200"}
x<-{$f_$profileobject:r_test_xmin$}:{$f_$profileobject:r_test_xmax$}
y<-x*x
plot(x,y)
title('Graph with xmin {$f_$profileobject:r_test_xmin$} & xmax {$f_$profileobject:r_test_xmax$} and y=x^2')

cat("\nResults from {$f_$profileobject:r_test_xmin$}*{$f_$profileobject:r_test_xmax$}: ")
results <- {$f_$profileobject:r_test_xmin$}*{$f_$profileobject:r_test_xmax$}
cat(results)
cat("\n")

if ( exists("file_type") ) {
cat("\nFile type from this attachment: ")
cat(file_type)
cat("\nContents of the attachment to this dataset:\n")
print(data)
} else {
cat("No attachment to display in this raw dataset")
}

{/wikiplugin}