Create sturgrow.R