This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #' Given a matrix-like object with genes being rows, samples/cells being columns, | |
| #' and a group information for the columns, calculate the percentage of expression per group. | |
| #' No dependencies other than base R. The CsparseMatrix format, commonly used in scRNA-seq is supported. | |
| #' | |
| #' @param data numeric matrix or data.frame-like object | |
| #' @param group a vector (character or factor) | |
| #' @param threshold values above this threshold are considered expressed | |
| #' @param digits round results to this number of digits | |
| #' | |
| #' @examples |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| library(DESeq2) | |
| #/ from https://raw.githubusercontent.com/shangguandong1996/picture_link/main/WFX_count_Rmatrix.txt | |
| data <- read.delim("WFX_count_Rmatrix.txt", row.names = "Geneid") | |
| get_res <- function(dds){ | |
| dds <- DESeq(dds) | |
| res <- results(dds, name=resultsNames(dds)[2]) | |
| lfcShrink(dds, coef=resultsNames(dds)[2], res=res, type="ashr") | |
| } |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| $ make | |
| mkdir -p objs | |
| g++ -std=c++11 -Wall -O3 -fopenmp -march=native -c src/chromap.cc -o objs/chromap.o -lm -lz | |
| src/chromap.cc:1096:0: warning: ignoring #pragma omp taskloop [-Wunknown-pragmas] | |
| #pragma omp taskloop grainsize(grain_size) //num_tasks(num_threads_* 50) | |
| ^ | |
| src/chromap.cc:2001:0: warning: ignoring #pragma omp taskloop [-Wunknown-pragmas] | |
| #pragma omp taskloop num_tasks(num_threads_* num_threads_) | |
| ^ | |
| src/chromap.cc: In instantiation of 'void chromap::Chromap<MappingRecord>::MapSingleEndReads() [with MappingRecord = chromap::PAFMapping]': |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #!/usr/bin/env nextflow | |
| nextflow.enable.dsl=2 | |
| // Dummy example: Decompress a BAM in processA => stdout => read in processB as stdin and compress back to BAM. | |
| process processA { | |
| input: | |
| path(bam) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| $ head renv.lock -n 40 | |
| { | |
| "R": { | |
| "Version": "4.0.3", | |
| "Repositories": [ | |
| { | |
| "Name": "CRAN", | |
| "URL": "https://cran.rstudio.com" | |
| } | |
| ] |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| library(recount) | |
| library(edgeR) | |
| #/ Get the counts from GTEx via recount as a SummarizedExperiment | |
| #/ => 1.3GB file | |
| options(timeout=600) | |
| download_study("SRP012682", type = "rse-gene") | |
| load(file.path("SRP012682", "rse_gene.Rdata")) | |
| #/ remove whitespaces in tissue names: |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| FATAL: container creation failed: unable to copy files to container fs: while copying [environment.yml] to /tmp/rootfs-4b4c7b49-9f72-11eb-a808-12cf446d2005/environment.yml: exit status 1: /bin/cp: cannot stat 'environment.yml': No such file or directory | |
| FATAL: While performing build: while running engine: while running /usr/local/libexec/singularity/bin/starter: exit status 255 | |
| FATAL: While performing build: build image size <= 0 |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| > sessionInfo() | |
| R version 4.0.3 (2020-10-10) | |
| Platform: x86_64-apple-darwin17.0 (64-bit) | |
| Running under: macOS Mojave 10.14.6 | |
| Matrix products: default | |
| BLAS: /System/Library/Frameworks/Accelerate.framework/Versions/A/Frameworks/vecLib.framework/Versions/A/libBLAS.dylib | |
| LAPACK: /Library/Frameworks/R.framework/Versions/4.0/Resources/lib/libRlapack.dylib | |
| locale: |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| library(ggplot2) | |
| library(reshape2) | |
| library(egg) | |
| # thanks to https://stackoverflow.com/questions/1330989/rotating-and-spacing-axis-labels-in-ggplot2/60650595#60650595 | |
| dat<-reshape2::melt(data.frame(groupA=rnorm(20), | |
| groupB=rnorm(20), | |
| groupC=rnorm(20))) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| metaBigBam.c:485:12: warning: 'cigar_tab' is deprecated: Use bam_cigar_table[] instead [-Wdeprecated-declarations] | |
| if (h->cigar_tab == 0) | |
| ^ | |
| /usr/local/include/htslib/sam.h:75:29: note: 'cigar_tab' has been explicitly marked deprecated here | |
| const int8_t *cigar_tab HTS_DEPRECATED("Use bam_cigar_table[] instead"); | |
| ^ | |
| /usr/local/include/htslib/hts_defs.h:75:49: note: expanded from macro 'HTS_DEPRECATED' | |
| #define HTS_DEPRECATED(message) __attribute__ ((__deprecated__ (message))) | |
| ^ | |
| metaBigBam.c:487:5: warning: 'cigar_tab' is deprecated: Use bam_cigar_table[] instead [-Wdeprecated-declarations] |