Skip to content
Prev Previous commit
Next Next commit
Remove generateAliasesForIntersectedCols in the doc and shorten the name
  • Loading branch information
HyukjinKwon committed Sep 29, 2017
commit e83fd5a78fd5aa66a5efa8d33549e5de80862353
9 changes: 5 additions & 4 deletions R/pkg/R/DataFrame.R
Original file line number Diff line number Diff line change
Expand Up @@ -2614,8 +2614,8 @@ setMethod("merge",
}

# sets alias for making colnames unique in dataframes 'x' and 'y'
colsX <- generateAliasesForIntersectedCols(x, by, suffixes[1]) # nolint
colsY <- generateAliasesForIntersectedCols(y, by, suffixes[2]) # nolint
colsX <- genAliasesForIntersectedCols(x, by, suffixes[1])
colsY <- genAliasesForIntersectedCols(y, by, suffixes[2])

# selects columns with their aliases from dataframes
# in case same column names are present in both data frames
Expand Down Expand Up @@ -2664,8 +2664,9 @@ setMethod("merge",
#' @param suffix a suffix for the column name
#' @return list of columns
#'
#' @note generateAliasesForIntersectedCols since 1.6.0
generateAliasesForIntersectedCols <- function(x, intersectedColNames, suffix) { # nolint
#' @note genAliasesForIntersectedCols since 1.6.0
Copy link
Member

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

nit: I'd remove this @note too

#' @noRd
genAliasesForIntersectedCols <- function(x, intersectedColNames, suffix) {
allColNames <- names(x)
# sets alias for making colnames unique in dataframe 'x'
cols <- lapply(allColNames, function(colName) {
Expand Down