shell script with read input from R

I have a shell script

#!/bin/sh
read -p 'My_date : ' mydate
echo $mydate

and I want to run it from R, I've tried system(myshell_script.sh) but it doesn't seem to work, my Rstudio crashes.