使用vcf2geno代码时R会话中止
试图让这段代码再次运行,我已不再感到沮丧。这段代码以前工作过,我提交了完整的作业,但我试图将其用于我的项目,现在运行这段代码会导致R中止会话 代码如下:使用vcf2geno代码时R会话中止,r,rstudio,vcf-vcard,genome,R,Rstudio,Vcf Vcard,Genome,试图让这段代码再次运行,我已不再感到沮丧。这段代码以前工作过,我提交了完整的作业,但我试图将其用于我的项目,现在运行这段代码会导致R中止会话 代码如下: library(LEA) setwd("/Users/Changirwa/Desktop/COURSES/BIOL 468") vcf2geno(input.file = "data/pika_subset.vcf", output.file = "data/pika_subset.geno") geno2lfmm(input.file =
library(LEA)
setwd("/Users/Changirwa/Desktop/COURSES/BIOL 468")
vcf2geno(input.file = "data/pika_subset.vcf", output.file = "data/pika_subset.geno")
geno2lfmm(input.file = "data/pika_subset.geno", output.file = "data/pika_subset.lfmm")
我试图编织文件,看看它会说什么,它是这样说的:
*已捕获故障*
地址0x0,导致“内存未映射”
Traceback:
1: vcf2geno(input.file = "data/pika_subset.vcf", output.file = "data/pika_subset.geno")
2: eval(expr, envir, enclos)
3: eval(expr, envir, enclos)
4: withVisible(eval(expr, envir, enclos))
5: withCallingHandlers(withVisible(eval(expr, envir, enclos)), warning = wHandler, error = eHandler, message = mHandler)
6: handle(ev <- withCallingHandlers(withVisible(eval(expr, envir, enclos)), warning = wHandler, error = eHandler, message = mHandler))
7: timing_fn(handle(ev <- withCallingHandlers(withVisible(eval(expr, envir, enclos)), warning = wHandler, error = eHandler, message = mHandler)))
8: evaluate_call(expr, parsed$src[[i]], envir = envir, enclos = enclos, debug = debug, last = i == length(out), use_try = stop_on_error != 2L, keep_warning = keep_warning, keep_message = keep_message, output_handler = output_handler, include_timing = include_timing)
9: evaluate::evaluate(...)
10: evaluate(code, envir = env, new_device = FALSE, keep_warning = !isFALSE(options$warning), keep_message = !isFALSE(options$message), stop_on_error = if (options$error && options$include) 0L else 2L, output_handler = knit_handlers(options$render, options))
11: in_dir(input_dir(), evaluate(code, envir = env, new_device = FALSE, keep_warning = !isFALSE(options$warning), keep_message = !isFALSE(options$message), stop_on_error = if (options$error && options$include) 0L else 2L, output_handler = knit_handlers(options$render, options)))
12: block_exec(params)
13: call_block(x)
14: process_group.block(group)
15: process_group(group)
16: withCallingHandlers(if (tangle) process_tangle(group) else process_group(group), error = function(e) { setwd(wd) cat(res, sep = "\n", file = output %n% "") message("Quitting from lines ", paste(current_lines(i), collapse = "-"), " (", knit_concord$get("infile"), ") ") })
17: process_file(text, output)
18: knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet)
19: rmarkdown::render("/Users/changirwa/Downloads/rlab3.Rmd", encoding = "UTF-8")
An irrecoverable exception occurred. R is aborting now ...
回溯:
1:vcf2geno(input.file=“data/pika_subset.vcf”,output.file=“data/pika_subset.geno”)
2:eval(expr、envir、enclose)
3:eval(expr、envir、enclose)
4:带可见(eval(expr、envir、enclose))
5:WithCallingHandler(withVisible(eval(expr,envir,enclose)),warning=wHandler,error=eHandler,message=mHandler)
6:handle(ev我刚和一个学生碰到了同样的错误,我们有以下代码:
library(LEA)
input_file <- 'outliers.vcf'
vcf2geno(input_file, 'output')
库(LEA)
输入文件