具体代码:
> library("TCGAbiolinks") > path <- "." > query.met <- TCGAquery(tumor = c("LGG","GBM"),"HumanMethylation450", level = 3) > TCGAdownload(query.met, path = path ) -=-=-=-= | Downloading:28 folders | Path:. -=-=-=-= | | 0% Downloading:jhu-usc.edu_GBM.HumanMethylation450.Level_3.8.6.0.tar.gz % Total % Received % Xferd Average Speed Time Time Time Current Dload Upload Total Spent Left Speed 0 0 0 0 0 0 0 0 --:--:-- --:--:-- --:--:-- 0 0 0 0 0 0 0 0 0 --:--:-- --:--:-- --:--:-- 0 0 0 0 0 0 0 0 0 --:--:-- 0:00:01 --:--:-- 0100 231 100 231 0 0 117 0 0:00:01 0:00:01 --:--:-- 117 100 231 100 231 0 0 100 0 0:00:02 0:00:02 --:--:-- 100 100 231 10100 231 100 231 0 0 88 0 0:00:02 0:00:02 --:--:-- 0 100 231 100 231 0 0 78 0 0:00:02 0:00:02 --:--:-- 78 100 231 100 231 0 0 70 0 0:00:03 0:00:03 --:--:-- 70 100 231 100 100 231 100 231 0 0 64 0 0:00:03 0:00:03 --:--:-- 0 100 231 100 231 0 0 58 0 0:00:03 0:00:03 --:--:-- 58 100 231 100 231 0 0 54 0 0:00:04 0:00:04 --:--:-- 54 100 100 231 100 231 0 0 50 0 0:00:04 4 --:--:-- 500:00:04 --:--:-- 0 100 231 100 231 0 0 47 0 0:00:04 0:00:04 --:--:-- 47 100 231 100 231 0 0 44 0 0:00:05 0:00:05 --:--:-- 44 Error in curl::curl_download(input, tt, mode = "wb", quiet = !showProgress) : Number of redirects hit maximum amount