閱讀下面的另一列

我使用了一些異國情調的軟件來分析我的一些結果的不同列，並將它決定輸出數據以這種方式閱讀下面的另一列

Dem-Dexc Aem-Dexc Aem-Aexc  S   E  
3380.4193 581.2386 -141.1475 1.0369 0.1467 
3236.4193 1608.2386 570.8525 0.8946 0.3320 
1057.4193 557.2386 4533.8525 0.2626 0.3451 
3098.4193 4928.2386 1524.8525 0.8404 0.6140 
3716.4193 2427.2386 6633.8525 0.4808 0.3951 


    Fit 
0.4693 
0.4693 
0.4693 
0.4693 
0.4693

我怎麼能與陪讀的Fit列休息？

來源

2017-08-08 komodovaran_

您可以執行兩個'read.csv'函數，第一個帶'nrow'參數，第二個帶'skip'參數。 – lmo

它是製表符分隔的嗎？爲什麼不'read.csv（「file」，sep =「\ t」，header = T）'？ – CPak

@lmo沒想到那個！結束閱讀兩遍，第二次跳過前700行（在原始數據中），然後'把它連接到第一行。 –

所以我想我會發布它作爲一個完整的答案（感謝LMO）

全部數據可以在這裏找到： https://pastebin.com/HrBSVCZP

library(readr) 

Top <- read_delim("~/Desktop/File.txt", 
        "\t", 
        escape_double = FALSE, 
        col_names = FALSE, # Need to get rid of the weird multi-whitespace separation 
        trim_ws = TRUE, 
        skip = 6) 

Top <- na.omit(Top) # Removes bottom column entirely because of adjacent NA rows 

Btm <- read_delim("~/Desktop/File.txt", 
        "\t", escape_double = FALSE, 
        col_names = TRUE, 
        trim_ws = TRUE, 
        skip = 708) 

df <- cbind(Top, Btm)

第一列需要適當的重命名，因爲我不得不早一點跳過。

來源

2017-08-08 14:18:34

閱讀下面的另一列

回答

相關問題