HTMLon() nombre = as.numeric(nombre) carre = nombre * nombre reponse = paste("le carre de",nombre,"vaut",carre) library(R2HTML) HTML(reponse) HTMLoff()