Parameterization, use data in R

Please pull my commits.