Loci composition integrated with R plot script