读取HITRAN文件格式

读取HITRAN文件格式,r,R,举个例子,我试图读取data.frame中的数据。根据(pdf文件,表1),它遵循一些fortran约定。我尝试了以下方法,但收效甚微: dir <- "Uncompressed-files/" file <- "01_hit09.par" delim <- c("I2", "I1", "F12.6", "E10.3", "E10.3", "F5.4", "F5.4", "F10.4", "F4.2", "F8.6", "A15", "A15", "A15", "A15",

举个例子,我试图读取data.frame中的数据。根据(pdf文件,表1),它遵循一些fortran约定。我尝试了以下方法,但收效甚微:

dir <- "Uncompressed-files/"
file <- "01_hit09.par"

delim <- c("I2", "I1", "F12.6", "E10.3", "E10.3", "F5.4", "F5.4", 
"F10.4", "F4.2", "F8.6", "A15", "A15", "A15", "A15", "6I1", "6I2", 
"A1", "F7.1", "F7.1")
test <- read.fortran(paste0(dir, file), delim)

test <- read.fwf(paste0(dir, file),
                 c(2, 1, 12, 10, 10, 5, 5, 10, 4, 8,
                   15, 15, 15, 15, 6, 12, 1, 7, 7))

dir根据
?read.fortran

  • “E”
    不是受支持的格式
  • 以“F”或“d”格式指定“d>0”将发生移动 小数点左边的“d”位,即使它是显式的 在输入文件中指定。“
  • 因此,将
    “E”
    更改为
    “F”
    ,并删除所有显式十进制格式:

    file <- "01_hit09.par"
    delim <- c("I2", "I1", "F12", "F10", "F10", "F5", "F5", "F10", "F4", "F8",
               "A15", "A15", "A15", "A15", "6I1", "6I2", "A1", "F7", "F7")
    (test <- read.fortran(file, delim, n=10))
    

    根据
    ?read.fortran

  • “E”
    不是受支持的格式
  • 以“F”或“d”格式指定“d>0”将发生移动 小数点左边的“d”位,即使它是显式的 在输入文件中指定。“
  • 因此,将
    “E”
    更改为
    “F”
    ,并删除所有显式十进制格式:

    file <- "01_hit09.par"
    delim <- c("I2", "I1", "F12", "F10", "F10", "F5", "F5", "F10", "F4", "F8",
               "A15", "A15", "A15", "A15", "6I1", "6I2", "A1", "F7", "F7")
    (test <- read.fortran(file, delim, n=10))
    

    你犯了什么错误?或者你的
    test
    有什么问题?你的
    read.fwf
    版本适合我。(除了read.fwf真的很慢)有更快的版本,例如包
    mvbutils
    @Andrie:
    read.fwf
    “工作”,但格式没有正确指定,因此输出不正确。具体来说,
    “6I1”
    “6I2”
    前面的6表示“将此格式重复6次”。您遇到了什么错误?或者你的
    test
    有什么问题?你的
    read.fwf
    版本适合我。(除了read.fwf真的很慢)有更快的版本,例如包
    mvbutils
    @Andrie:
    read.fwf
    “工作”,但格式没有正确指定,因此输出不正确。具体来说,
    “6I1”
    “6I2”
    前面的6表示“重复此格式6次”。