问题描述
我需要帮助,我不知道如何在关闭应用程序时在后台进行函数调用,它仅在打开或最小化时才起作用。
install.packages("ape")
library(ape)
library(Biostrings)
dog_ch38 <- read.GenBank("NC_006620.3",as.character = TRUE)
dog_ch38 <- dog_ch38$NC_006620.3[1:100000]
txt <- paste(dog_ch38,collapse = "")
dog_ch38 <- str_to_upper(txt)
dog_ch38
get_DNA_sample <- function(DNA,n){
N <- str_length(DNA)
start <- sample(1:(N - n + 1),size = 1)
return(str_sub(DNA,start,start + n - 1))
}
get_DNA_sample(dog_ch38,1000)
解决方法
暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!
如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。
小编邮箱:dio#foxmail.com (将#修改为@)