This code I have tried to show a clean plot but failed. Could you give me your kind comments and revision for this code?
Thank you!
TG
set.seed(123456)
y <- arima.sim(n = 100, list(ar = 0.9), innov=rnorm(100))
op <- par(no.readonly=TRUE)
layout(matrix(c(1, 1, 2, 3), 2, 2, byrow=TRUE))
plot.ts(y, ylab='')
Error in plot.new() : figure margins too large
acf(y, main='Autocorrelations', ylab='', ylim=c(-1, 1), ci.col = "black")
Error in plot.new() : figure margins too large
pacf(y, main='Partial Autocorrelations', ylab='', ylim=c(-1, 1), ci.col = "black")
Error in plot.new() : figure margins too large
par(op)