An R package for sparse PCA via Fantope Projection and Selection