month_count_percent<-round((count_records_per_month$count/sum(count_records_per_month$count))*100,1)
pie(count_records_per_month$count, labels = month_count_percent, main = "2020 Machines per Month pie chart",col = rainbow(length(count_records_per_month$count)))
legend("topright",count_records_per_month$Month, cex = 0.8,
fill = rainbow(length(count_records_per_month$count)))
Error in as.graphicsAnnot(legend) :
argument "legend" is missing, with no default