Получение информации из смешанной строки и файла таблицы - PullRequest
Новая
       28

Получение информации из смешанной строки и файла таблицы

0 голосов
/ 15 января 2020

У меня есть текстовые файлы. Содержит заголовок строковой информации и таблицу информации. 

info_in_file <- read.table( "ch4_alt_surface-flask_2_3001-9999_monthly.txt")
info_in_file
    V1   V2 V3 V4 V5 V6 V7   V8 V9 V10 V11 V12 V13     V14      V15 V16
1   ALT 1985  6  1  0  0  0 -999 -9  -9  -9  -9  -9 1728.52 -999.999  -9
2   ALT 1985  7  1  0  0  0 -999 -9  -9  -9  -9  -9 1716.95 -999.999  -9
3   ALT 1985  8  1  0  0  0 -999 -9  -9  -9  -9  -9 1715.50 -999.999  -9
4   ALT 1985  9  1  0  0  0 -999 -9  -9  -9  -9  -9 1739.49 -999.999  -9
5   ALT 1985 10  1  0  0  0 -999 -9  -9  -9  -9  -9 1760.60 -999.999  -9

Но когда я открываю этот файл в Excel, я нахожу некоторые строки. Например, 

site_name: Alert

Мне нужно получить часть этой информации. Мне нужно получить имя станции в переменной. Как мне решить мою проблему? Это тот файл

1 Ответ

0 голосов
/ 15 января 2020

read.table имеет аргумент comment.char = "#", который игнорирует все строки "заголовка".

Используйте readLines , затем grep 

# read the data, as you did already
info_in_file <- read.table("ch4_alt_surface-flask_2_3001-9999_monthly.txt")

# read every row as a string
header <- readLines("ch4_alt_surface-flask_2_3001-9999_monthly.txt")

# extract the rows we need
header[ grepl("site_name", header) ]
...