我想找到一个特定项目的两栏。 我需要获得项目_Name中每个项目的“0/1”或“1/1”号标语。
例数据范围:
| Item_Name | Sample_A | Sample_B | Sample_C |
|---|---|---|---|
| Nino1 | 0/1 | 0/0 | 1/1 |
| Nino2 | 0/0 | 1/1 | 0/1 |
| Nino3 | 1/1 | 0/1 | 0/0 |
www.un.org/Depts/DGACM/index_spanish.htm 预期产出:
Nino1 - SampleA, Sample_C
Nino2 - Sample_B, Sample_C
Nino3 - Sample_A, Sample_B
现在,我知道会利用碎块及时找到一种模式。 我不敢肯定如何获得name名。
data_frame_mod <- dataframe[Reduce(`|`, lapply(dataframe, grepl, pattern = "0/1"))]
增 编
在这里,采取相当审慎的做法:
library(tidyverse)
desired <- c("0/1", "1/1")
dataframe |>
rowwise() |>
mutate(samples = names(dataframe)[c_across(everything()) %in% desired] |> paste(collapse = ", ")) |>
ungroup()
最新情况: 1名干事
mutate(df, goal = apply(df, 1, (x) names(df)[x %in% desired] |> paste(collapse = ", ")))
Output:
# A tibble: 3 × 5
Item_Name Sample_A Sample_B Sample_C samples
<chr> <chr> <chr> <chr> <chr>
1 Nino1 0/1 0/0 1/1 Sample_A, Sample_C
2 Nino2 0/0 1/1 0/1 Sample_B, Sample_C
3 Nino3 1/1 0/1 0/0 Sample_A, Sample_B
This is a really really simple question to which I seem to be entirely unable to get a solution. I would like to do a scatter plot of an observed time series in R, and over this I want to plot the ...
since the latest Ubuntu release (karmic koala), I noticed that the internal R package advertises on start-up the REvolution package. It seems to be a library collection for high-performance matrix ...
I am trying to run an analysis by invoking R through the command line as follows: R --no-save < SampleProgram.R > SampleProgram.opt For example, consider the simple R program below: mydata =...
I m trying to generate GOFrame objects to generate a gene ontology mapping in R for unsupported organisms (see http://www.bioconductor.org/packages/release/bioc/vignettes/GOstats/inst/doc/...
I have a dataframe df.all and I m plotting it in a bar plot with ggplot2 using the code below. I d like to make it so that the order of the dodged bars is flipped. That is, so that the bars labeled "...
I m getting a weird error when training a glmnet regression. invalid class "dgCMatrix" object: length(Dimnames[[2]]) must match Dim[2] It only happens occasionally, and perhaps only under larger ...
Sorry for the non-descriptive title but I don t know whether there s a word for what I m trying to achieve. Let s assume that I have a list of names of different classes like c( 1 , 2 , 3 , 4 ) ...
I m plotting a group of curves, using facet in ggplot2. I d like to have a smoother applied to plots where there are enough points to smooth, but not on plots with very few points. In particular I d ...