first function commit
remove Rfunc
updated prototype
new function