# NOT RUN {
sys <- zpk(NULL, c(-1,-1), 1)
sys <- zpk(c(1,2), c(3,4), 5)
sys <- zpk(c(1,2), c(3+1i,4+2i), 5)
# }
# NOT RUN {
Access individual sys elements as
# }
# NOT RUN {
sys$z
sys$p
sys$k
# }
Run the code above in your browser using DataLab