4 Commits

Author SHA1 Message Date
c49f1364b9 Merge branch 'developer' of https://gitea.hokage.de/RecklingK/Demo into developer 2019-12-20 11:45:51 +01:00
672300019d plot chic gemacht 2019-12-20 11:15:15 +01:00
3158fefa3a ggplot verlängert 2019-12-20 11:07:34 +01:00
49bb0ddc29 ggplot für fazfi limit 1000 2019-12-20 11:05:32 +01:00

16
demoFZSTAM.R Normal file
View File

@@ -0,0 +1,16 @@
library(ggplot2); library(RODBC)
channel <- odbcConnect("ebv_d29", uid = "RECKLINGK", pwd = "stapler13")
test <- sqlQuery(channel, stringsAsFactors=F,
"SELECT FZSTAM.FIRNR, FZSTAM.FAZID, FZSTAM.FAZFI, FZSTAM.BAUJJ
FROM FZSTAM
WHERE FZSTAM.FIRNR = 1
LIMIT 1000
")
odbcCloseAll(); rm(channel)
ggplot(test, aes(x=FAZID)) +
geom_line(aes(y=FAZFI)) +
geom_line(aes(y=BAUJJ), col="red") +
scale_fill_hue(c = 40) +
theme_bw()