basic ask r function with persisitence