# Map 1-based optional input ports to variables
dataset1 <- maml.mapInputPort(1) # class: data.frame

seasonality<-1
labels <- as.numeric(dataset1$data)
timeseries <- ts(labels,frequency=seasonality)

# You'll see this output in the R Device port.
# It'll have your stdout, stderr and PNG graphics device(s).
acf(timeseries, lag.max=24)
pacf(timeseries, lag.max=24)
