Wirkstoff_Code <- c("WI0815", "WI0816", "WI0817")
Gehalt_MW <- c(98.3, 96.5, 97.9)
Varianz <- c(1.1, 0.8, 1.2)
Wirkstoffe <- data.frame(Wirkstoff_Code, Gehalt_MW, Varianz)
Wirkstoffe
setwd("c:/programme/statistik/R-2.3.1/Eigene_Projekte")
write.csv2(Wirkstoffe, "Datensatz_Beispiel.csv")