PCoA散点图 - 包adegenet中种群的个体符号

I am new to R, and am running PCoAs using the package Adegenet. I would like each of my populations to be given a different symbol, and have but unsuccessful at doing so (I can assign different colors to each population, but not symbols). I've tried the following: I am new to R, and am running PCoAs using the p