>source

나는 그들 각각에 대해 몇 가지 유전자를 가지고 있습니다. 나는 그들이 가진 클론 또는 하위 클론 돌연변이가 아래와 같이 몇 개 있습니다.

# A tibble: 6 x 3
  gene_name clonal subclonal
  <chr>      <int>     <int>
1 APC            3         1
2 ARID1A         5         2
3 ARID1B        18         7
4 ARID2         16         2
5 CCDC102B     100        30
6 CCND1          2         0
>

예를 들어 APC의 각 유전자에 대해 다음과 같은 것을 원합니다.

어쨌든 R에서 이것을 할 수 있습니까?

정말 고맙습니다

  • 답변 # 1

    다음은 '긴'형식으로 변형하는 옵션입니다. pivot_longer 을 클릭 한 다음 '값'열의 숫자 개수를 기준으로 행을 확장하고 Yes_no 'Clonality'값이 'clonal'인지 여부 확인에서

    library(dplyr)
    library(tidyr)
    df1 %>% 
      pivot_longer(cols = clonal:subclonal, names_to = 'Clonality') %>% 
      uncount(value) %>% 
      mutate(Yes_no = case_when(Clonality == 'clonal' ~ 'Yes', TRUE ~ 'No'))
    
    

    -산출

    # A tibble: 186 x 3
    #   gene_name Clonality Yes_no
    #   <chr>     <chr>     <chr> 
    # 1 APC       clonal    Yes   
    # 2 APC       clonal    Yes   
    # 3 APC       clonal    Yes   
    # 4 APC       subclonal No    
    # 5 ARID1A    clonal    Yes   
    # 6 ARID1A    clonal    Yes   
    # 7 ARID1A    clonal    Yes   
    # 8 ARID1A    clonal    Yes   
    # 9 ARID1A    clonal    Yes   
    #10 ARID1A    subclonal No    
    # … with 176 more rows
    
    

    데이터

    df1 <- structure(list(gene_name = c("APC", "ARID1A", "ARID1B", "ARID2", 
    "CCDC102B", "CCND1"), clonal = c(3L, 5L, 18L, 16L, 100L, 2L), 
        subclonal = c(1L, 2L, 7L, 2L, 30L, 0L)),
        class = "data.frame", row.names = c("1", 
    "2", "3", "4", "5", "6"))
    
    

  • 이전 javascript - 단일 배열을 2 차원 배열로 6으로 변환
  • 다음 Flutter file_picker 플러그인은 프로젝트를 빌드 할 수 없습니다