It allows to create a new set given some condition. If no element meet the condition an empty set is created.
Arguments
- object
A TidySet object.
- name
The name of the new set.
- ...
A logical condition to subset some elements.
See also
Other methods:
TidySet-class,
activate(),
add_column(),
add_relation(),
arrange.TidySet(),
cartesian(),
complement_element(),
complement_set(),
complement(),
element_size(),
elements(),
filter.TidySet(),
group_by.TidySet(),
incidence(),
intersection(),
is.fuzzy(),
is_nested(),
move_to(),
mutate.TidySet(),
nElements(),
nRelations(),
nSets(),
name_elements<-(),
name_sets<-(),
name_sets(),
power_set(),
pull.TidySet(),
relations(),
remove_column(),
remove_element(),
remove_relation(),
remove_set(),
rename_elements(),
rename_set(),
select.TidySet(),
set_size(),
sets(),
subtract(),
union()
Examples
x <- list("A" = c("a" = 0.1, "b" = 0.5), "B" = c("a" = 0.2, "b" = 1))
TS <- tidySet(x)
TS1 <- group(TS, "C", fuzzy < 0.5)
TS1
#> elements sets fuzzy
#> 1 a A 0.1
#> 2 b A 0.5
#> 3 a B 0.2
#> 4 b B 1.0
#> 5 a C 1.0
sets(TS1)
#> sets
#> 1 A
#> 2 B
#> 3 C
TS2 <- group(TS, "D", fuzzy < 0)
sets(TS2)
#> sets
#> 1 A
#> 2 B
#> 3 D
r <- data.frame(
sets = c(rep("A", 5), "B", rep("A2", 5), "B2"),
elements = rep(letters[seq_len(6)], 2),
fuzzy = runif(12),
type = c(rep("Gene", 2), rep("Protein", 2), rep("lncRNA", 2))
)
TS3 <- tidySet(r)
group(TS3, "D", sets %in% c("A", "A2"))
#> elements sets fuzzy type
#> 1 a A 0.08332378 Gene
#> 2 b A 0.99853577 Gene
#> 3 c A 0.32073818 Protein
#> 4 d A 0.73340704 Protein
#> 5 e A 0.32495104 lncRNA
#> 6 f B 0.50935597 lncRNA
#> 7 a A2 0.78592541 Gene
#> 8 b A2 0.19576518 Gene
#> 9 c A2 0.98107416 Protein
#> 10 d A2 0.04657707 Protein
#> 11 e A2 0.20961284 lncRNA
#> 12 f B2 0.63284649 lncRNA
#> 13 a D 1.00000000 <NA>
#> 14 b D 1.00000000 <NA>
#> 15 c D 1.00000000 <NA>
#> 16 d D 1.00000000 <NA>
#> 17 e D 1.00000000 <NA>