Read a 3D-COL acceleration record (ACA, ACB, LIS).

One file holds 3 components as parallel columns:

• ACA (IGP Peru): cols Z N E after a header row.

• ACB (CISMID Peru): cols T EW NS UD; the time column T is dropped.

• LIS (UCR Costa Rica): cols N00E UPDO N90E after a ===DATA=== line.

Usage

readAC(file, type)

Arguments

file

Path to the file.

type

One of "ACA", "ACB", "LIS".

Value

LONG data.table(t, OCID, s).

Details

OCIDs come from the file's column header line.

Examples

file <- tempfile()
writeLines(c(
  "MUESTREO : 100",
  "  Z N E",
  "1 2 3",
  "4 5 6"
), file)
readAC(file, type = "ACA")
#>        t   OCID     s
#>    <num> <char> <int>
#> 1:  0.00      Z     1
#> 2:  0.01      Z     4
#> 3:  0.00      N     2
#> 4:  0.01      N     5
#> 5:  0.00      E     3
#> 6:  0.01      E     6