Edit the embed R code part