Re: Schleife einbauen
Verfasst: Fr Okt 12, 2018 9:51 am
Hallo NeueR,
an Reproduzierbarkeit müssen wir noch arbeiten. Bei mir sieht das so aus:mit dem Ergebnis:
Ich habe mir dann folgendes erarbeitet:So, jetzt brauchen wir nur noch den Dataframe daten in reproduzierbarer Form.
z.B.
Danach kann es an die eigentliche Hilfeleistung gehen ...
Gruß, Jörg
an Reproduzierbarkeit müssen wir noch arbeiten. Bei mir sieht das so aus:
Code: Alles auswählen
library("nVennR")
d1 <- createVennObj(nSets = 2, sNames = c('A', 'B'))
d1 <- setVennRegion(d1, c("A"), 5)
d1 <- setVennRegion(d1, c("B"), 3)
d1 <- setVennRegion(d1, c("A", "B"), 1)
myV <- plotVenn(nVennObj = d1)
showSVG(nVennObj = myV)
Warnmeldung:
In showSVG(myVenn, ...) :
The figure cannot be rendered in the plot window. Please, use the arguments outFile and/or systemShow.
Ich habe mir dann folgendes erarbeitet:
Code: Alles auswählen
library("nVennR")
d1 <- createVennObj(nSets = 2, sNames = c('A', 'B'))
d1 <- setVennRegion(d1, c("A"), 5)
d1 <- setVennRegion(d1, c("B"), 3)
d1 <- setVennRegion(d1, c("A", "B"), 1)
myV <- plotVenn(nVennObj = d1)
showSVG(nVennObj = myV, systemShow = TRUE)
z.B.
Code: Alles auswählen
daten <- read.csv(header=TRUE, text=
"N, Region1, Region2, Region3
A, 5, 8, 10
B, 3, 5, 6
AB, 1,3,5")
Gruß, Jörg