R write function to bind column to dataframe

Question

I wrote a function which creates a vector of values via a substring operation on a column of an existing data frame:

fetchParent <- function(column){
  substr(column,1,regexpr(":", column)-1)
}

An example run of this function is:

fetchParent(task2017.06.28$"Work Product")

This returns a vector:

 [1] "DE10946" "DE5909"  "US30637" "US31460" "DE16399" "DE18046" "DE18841" "DE18904" "DE19138"
 [10] "US48201" "US48314" "US48315" "US48316" "US48317 ...

I wrote a second function to bind this vector to the original data frame:

addParent <- function(df){
  df <- cbind(df,fetchParent(df$"Work Product"))
}

However, when I run this function:

addParent(task2017.06.28)

the result returns the original without the new column.

What am I missing here?

Did you assign the result of `addParent(...)` to an object? Like `df2 <- addParent(...)` ? — thelatemail, Jul 04 '17 at 03:09

score 0 · Accepted Answer · answered Jul 04 '17 at 08:09

0

You have to return the new data.frame:

addParent <- function(df){
     return(cbind(df,fetchParent(df$"Work Product")))
}

In your fetchParent() function this is not neccessary, because you don't assign the output of substr to anything.

So this would work as well:

addParent <- function(df){
    cbind(df,fetchParent(df$"Work Product"))
}

and also

addParent <- function(df){
    df <- cbind(df,fetchParent(df$"Work Product"))
    return(df)
}

answered Jul 04 '17 at 08:09

psychOle

1,054
9
19

Thanks. I posted this last night shortly before going to bed. As often happens, as I lay there thinking this over, I figured that it was something very basic, but it was just beyond my grasp. I won't forget the return() function any time soon, thanks again. – Charles Knell Jul 04 '17 at 12:11

R write function to bind column to dataframe

1 Answers1