R於輸入

執行的grep我有以下內容R於輸入

3594 -124.049541 44.429077 
-123.381222 44.530192 
-123.479913 44.625517 
-123.578917 44.720704 
END 
3595 -123.103772 45.009223 
-122.427717 45.101578 
-122.525757 45.198252 
-122.624122 45.294789 
END 
3676 -122.989567 44.147495 
-122.323040 44.238368 
-122.419523 44.335217 
-122.516322 44.431923 
END 
END

我想讀取此文件成R一個文件，但我想只保留縮進的行。

這似乎是grep的好工作，但我不知道如何使它工作。

有什麼想法？

來源

2012-07-16 Richard

你可以嘗試，其中file.txt包含您的數據：

a <- readLines("file.txt") 
a <- a[grepl("^ ", a)] 
do.call("rbind", strsplit(a, " "))[, -1] 
     [,1]   [,2]  
    [1,] "-123.381222" "44.530192" 
    [2,] "-123.479913" "44.625517" 
    [3,] "-123.578917" "44.720704" 
    [4,] "-122.427717" "45.101578" 
    [5,] "-122.525757" "45.198252" 
    [6,] "-122.624122" "45.294789" 
    [7,] "-122.323040" "44.238368" 
    [8,] "-122.419523" "44.335217" 
    [9,] "-122.516322" "44.431923" 

# Alternatively you can get the data by read.table() as suggested by @Josh 
read.table(textConnection(a)) 
     V1  V2 
1 -123.3812 44.53019 
2 -123.4799 44.62552 
3 -123.5789 44.72070 
4 -122.4277 45.10158 
5 -122.5258 45.19825 
6 -122.6241 45.29479 
7 -122.3230 44.23837 
8 -122.4195 44.33522 
9 -122.5163 44.43192

來源

2012-07-16 18:18:27 johannes

尼斯。或者，要獲得一個包含兩個數字列的數據框，只需將上面的最後一行更改爲'read.table（textConnection（a））'。 – 2012-07-16 18:27:49

@Josh，謝謝你的加入 – johannes 2012-07-16 18:32:01

回答

相關問題