# NOT RUN {
df1 <- data.frame("Name" = c("Sabonis ","Team"), "GP" = c(62,71),
"PTS" = c(387,0), "FG" = c(155,1), "FGA" = c(281,1),
"3P" = c(6,1),"3PA" = c(18,1), "FT" = c(39,1), "FTA" = c(53,1),
"ANDONE" = c(12,1), "AST" = c(0,1), "TOV" = c(27,1))
play_data_adjustment(df1)
# }
Run the code above in your browser using DataLab