Bom dia,
pesquisei e conversei com algumas pessoas e não resolvi o meu problema. Como tirar estes vetores desta imagem feita com o plot?
require(bpca)
fit=bpca
plot(bpca(iris[2:4],center =2),var.factor = 0.2)

obrigado

 
André Oliveira Souza. Graduação em Matemática, mestrado em estatística aplicada.Instituto Federal de Educação, Ciência e Tecnologia do Espirito Santo.  IFES