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
#' explore workspace tables | |
#' @import AnVIL | |
#' @import shiny | |
#' @import DT | |
#' @export | |
tabview = function() { | |
knownTabs = c("anvil_biosample", "donor", "project", "anvil_project", "file", | |
"anvil_file", "activity", "anvil_activity") | |
colhelper = list(anvil_project = c("import:timestamp", "title", |
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[4]: Leaving directory '/home/stvjc/SECURE/R-46-sec-src/src/extra/tre' | |
make[4]: Entering directory '/home/stvjc/SECURE/R-46-sec-src/src/extra/tre' | |
gcc -I. -I. -I../../../src/include -I../../../src/include -I/usr/local/include -DHAVE_CONFIG_H -fopenmp -fpic -O2 -Wall -Wformat=2 -Wconversion -Werror=format-security -U_FORTIFY_SOURCE -D_FORTIFY_SOURCE=3 -D_GLIBCXX_ASSERTIONS -fstack-clash-protection -fstack-protector-strong -Wl,-z,nodlopen -Wl,-z,noexecstack -Wl,-z,now -Wl,--as-needed -Wl,--no-copy-dt-needed-entries -fvisibility=hidden -c regcomp.c -o regcomp.o | |
gcc -I. -I. -I../../../src/include -I../../../src/include -I/usr/local/include -DHAVE_CONFIG_H -fopenmp -fpic -O2 -Wall -Wformat=2 -Wconversion -Werror=format-security -U_FORTIFY_SOURCE -D_FORTIFY_SOURCE=3 -D_GLIBCXX_ASSERTIONS -fstack-clash-protection -fstack-protector-strong -Wl,-z,nodlopen -Wl,-z,noexecstack -Wl,-z,now -Wl,--as-needed -Wl,--no-copy-dt-needed-entries -fvisibility=hidden -c regerror.c -o regerror.o | |
regcomp.c: In function ‘tre |
This file has been truncated, but you can view the full file.
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[1]: Entering directory '/home/stvjc/SECURE/R-46-sec-src/doc/manual' | |
creating RESOURCES | |
creating FAQ | |
creating doc/html/resources.html | |
make[1]: Leaving directory '/home/stvjc/SECURE/R-46-sec-src/doc/manual' | |
make[1]: Entering directory '/home/stvjc/SECURE/R-46-sec-src/m4' | |
make[1]: Nothing to be done for 'R'. | |
make[1]: Leaving directory '/home/stvjc/SECURE/R-46-sec-src/m4' | |
make[1]: Entering directory '/home/stvjc/SECURE/R-46-sec-src/tools' | |
make[1]: Nothing to be done for 'R'. |
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
FROM rocker/r-ver:devel | |
RUN apt update | |
RUN apt install -y vim git cmake | |
RUN git clone https://github.com/FranckRICHARD01/RbowtieCuda | |
# likely unnecessary | |
#RUN apt-get purge -y nvidia* libnvidia* | |
#RUN apt-get remove -y nvidia-* | |
#RUN rm -f /etc/apt/sources.list.d/*cuda* |
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(cellNexus) | |
library(dplyr) | |
md = get_metadata() | |
dd = md |> filter(disease=="normal", tissue %in% c("lung", "lung_parenchyma", "lung_epithelium")) | |
lungsce1M = get_single_cell_experiment(dd) | |
HDF5Array::setAutoBlockSize(size = 1e+09) |
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
exploreCN = function() { | |
md = cellNexus::get_metadata() | |
vbls = colnames(md) | |
ui = fluidPage( | |
sidebarLayout( | |
sidebarPanel( | |
helpText("navigate metadata of cellNexus"), | |
checkboxGroupInput("vars", "vbls", | |
choices=sort(colnames(md)), inline=TRUE) | |
), |
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(shiny) | |
library(CuratedAtlasQueryR) | |
library(dplyr) | |
library(rlang) | |
library(DT) | |
#' explore the CuratedAtlasQueryR metadata | |
#' @export | |
exploreCAQ = function() { | |
md = CuratedAtlasQueryR::get_metadata() | |
vbls = colnames(md) |
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
# This function can be run in a 'newPkgs' folder after sufficient | |
# results have been obtained in annosrc/db, to produce a sanctionedSqlite database | |
# for a single organism | |
# the following constants are crucial | |
whattype <- tolower("OrgDb") | |
wheretoput <- 20250301 | |
theversion <- "3.21.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
library(SpatialData) | |
library(SpatialData.data) | |
library(sf) | |
library(SummarizedExperiment) | |
if (!exists("mb")) mb = MouseBrainMERFISH() | |
make_circles = function(spd, shapetype="cells") { | |
cshape = SpatialData::shapes(spd)[[shapetype]] | |
df1 = data(cshape) |> as.data.frame() |
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
df2ellipses = function(datf, npts=100) { | |
requireNamespace("sfdep") | |
requireNamespace("sf") | |
stopifnot(all(c("X_centroid", "Y_centroid", "maj", "min", "angdeg") %in% names(datf))) | |
dd = data.matrix(datf[,c("X_centroid", "Y_centroid")]) | |
cens = lapply(seq_len(nrow(datf)), function(x) sf::st_point(dd[x,])) | |
maj = datf$maj | |
min = datf$min | |
angle_in_deg = datf$angdeg # angle_in_rad/0.01745329 | |
dd = data.matrix(cbind(dd, angdeg=datf[,"angdeg"])) #angle_in_deg) |
NewerOlder