13 subset visuvalization in r language

---------------------------------
MinutesPlayed
a=MinutesPlayed[c(1,3),]
#a
matplot(t(a),type = "l",pch = 18:20,col = c(1:10,6))

legend("bottomleft",inset=.01,legend = Players[c(1,3)],pch = 18:20,col = c(1:10,6),horiz = FALSE   )

a=MinutesPlayed[c(1,3),]
matplot(t(a),type = "b",pch = 18:20,col = c(1:10,6))

legend("bottomleft",inset=.01,legend = Players[c(1,3)],pch = 18:20,col = c(1:10,6),horiz = FALSE   )

a=MinutesPlayed[1,]
matplot(t(a),type = "b",pch = 18:20,col = c(1:10,6))

legend("bottomleft",inset=.01,legend = Players[c(1)],pch = 18:20,col = c(1:10,6),horiz = FALSE   )

a=MinutesPlayed[1,,drop=F]
matplot(t(a),type = "b",pch = 18:20,col = c(1:10,6))

legend("bottomleft",inset=.01,legend = Players[c(1)],pch = 18:20,col = c(1:10,6),horiz = FALSE   )