minor fixes

* import left_join from dplyr instead of inner_join

* change parameter name in the label_statcast_imputed_data documentation
  to match the function argument

NAMESPACE

@@ -46,7 +46,6 @@ importFrom(dplyr,filter)
 importFrom(dplyr,filter_)
 importFrom(dplyr,group_by)
 importFrom(dplyr,group_by_)
-importFrom(dplyr,inner_join)
 importFrom(dplyr,last)
 importFrom(dplyr,left_join)
 importFrom(dplyr,mutate)

R/label_statcast_imputed_data.R

@@ -5,14 +5,14 @@
 #' label Statcast data for which the launch angle and speed 
 #' have been imputed. 
 #' 
-#' @param x A dataframe containing Statcast batted ball data
+#' @param statcast_df A dataframe containing Statcast batted ball data
 #' @param impute_file A csv file giving the launch angle, launch speed, bb_type, events fields to label
 #' as imputed. if NULL then it's read from the `extdata` folder of the package.
 #' @param inverse_precision inverse of how many digits to truncate the launch angle 
 #' and speed to for comparison. default is 10000, i.e. keep 4 digits of precision.
 #' @keywords MLB, Statcast, sabermetrics
 #' @importFrom dplyr bind_rows
-#' @importFrom dplyr inner_join
+#' @importFrom dplyr left_join
 #' @return A copy of the input dataframe with a new column "imputed" appended. imputed
 #' is 1 if launch angle and launch speed are likely imputed, 0 otherwise.
 #' @export