add R grammar
add R input
add n^4 grammar and input
got code to show cubic fit