R script creates proper data frame.