GrabarTasacion <- function(Directorio, Muestra){
write.table(Muestra, paste(Directorio, "Tasacion.csv", sep = "/"), dec = ",", row.names = FALSE, col.names = FALSE)
Muestra
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.