1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29
|
library(RMySQL)
Phrases = c(
"J'aime les fraises et les pommes.",
"La cuisine française est délicieuse.",
"L'été en Provence est magnifique.",
"C'est une belle journée ensoleillée.",
"Ça va très bien, merci !"
)
df <- data.frame(c1 = Phrases)
con <- dbConnect(MySQL(),
host = host,
user = user,
password = password,
dbname = "database")
dbWriteTable(con, "Phrases", df, overwrite = TRUE, row.names = FALSE) # création de la table Phrases à partir des données de df
query <- "SELECT * FROM Phrases"
dbGetQuery(con, query)
c1
1 J'aime les fraises et les pommes.
2 La cuisine fran?aise est d?licieuse.
3 L'?t? en Provence est magnifique.
4 C'est une belle journ?e ensoleill?e.
5 ?a va tr?s bien, merci ! |
Partager