readSpc: Function to read X12-spc Files in x12Parameter R objects

In alexkowa/x12: Interface to 'X12-ARIMA'/'X13-ARIMA-SEATS' and Structure for Batch Processing of Seasonal Adjustment

Function to read X12-spc Files in x12Parameter R objects

Description

Still an early beta, so it will not work in specific situations

Usage

readSpc(file,filename=TRUE)

Arguments

file	character vector containing filenames of spc files
filename	if TRUE the filename (without) ".spc" will be used as name for the serie

Details

Not all arguments of an X12 spc file are supported, but the parameters described in x12 should be covered.

Value

The function returns an object of class "x12Single" if the file argument has length 1, otherwise it returns an "x12Batch" object.

Author(s)

Alexander Kowarik

See Also

x12

Examples

## Not run: 
  x12SingleObject1 <- readSpc("D:/aaa.spc")
  x12SingleObject2 <- readSpc("D:/ak_b.SPC")
  x12BatchObject1 <- readSpc(c("D:/ak_b.SPC","D:/aaa.spc"))
  setwd("M:/kowarik/Test/x12test")
  lf <- list.files()
  lf <- lf[unlist(lapply(lf,function(x)substr(x,nchar(x)-2,nchar(x)))) %in%c("spc","SPC")]
  lf <- lf[-c(grep("ind",lf))]
  allSPC <- readSpc(lf)
  a <- x12(allSPC)  
  plot(a@x12List[[1]])
  summary(a@x12List[[1]])

## End(Not run)

alexkowa/x12 documentation built on June 2, 2022, 11:32 a.m.