nVennr. Изменить стандартные формы фигуры и удалить легенду - PullRequest
0 голосов
/ 08 октября 2019

Я использую nVennr, который оказался весьма полезным, хотя я изучил всю сопроводительную документацию и до сих пор не могу выяснить, как сделать 2 вещи, которые, я думаю, возможны. Они показывают, как изменить отображаемые цифры в нестандартном формате и как удалить легенду.

Ниже приведены некоторые данные, иллюстрирующие, как nVennr автоматически преобразует цифры в стандартную форму.

library(nVennr)
library(dplyr)
library(rsvg)
library(grImport2)

SetA = round(runif(10000000),0)
SetB = round(runif(10000000),0)
SetC = round(runif(10000000),0)

allSets = cbind(SetA, SetB, SetC) %>% 
  as.data.frame() %>% 
  rownames_to_column()

SetA = subset(allSets, SetA == 1)$rowname
SetB = subset(allSets, SetB == 1)$rowname
SetC = subset(allSets, SetC == 1)$rowname

myV = plotVenn(list(SetA = SetA,
                SetB = SetB,
                SetC = SetC),
           nCycles = 10000)

Любая помощь будет принята с благодарностью, особенно в связи со стандартным выпуском формы, и это делает сюжеты довольно безобразными.

Спасибо!

...