How To R-Studio Label One Hot Encoding With Mulitple Examples