trim unused function
sketch communication of results back from R