Specify different pointshapes for var and ind in fviz_pca_biplot

Question

Is there any way of specifying shape for variables in fviz_pca_biplot() from R package FactoExtra?

For example I have the following code:

data("ir