s <- Steps(3, 1) # all stages of PG(3, 2)
names(s)
s$UDs[[1]]$UD # U(8, 2^7)
s3 <- Steps(3, 1, p = 3) # all stages of PG(3, 3)
s3$UDs[[1]]$UD # U(27, 3^13)
Steps(4, 1, c('S1', 'S4')) # first and last stage only, PG(4, 2)
Run the code above in your browser using DataLab