Return a data frame from function

by

If I understand you correctly, you are trying to create a dataframe with the number of complete cases for each id. Supposing your files are names with the id-numbers like you specified (e.g. f2.csv), you can simplify your function as follows:

myfunc <- function(directory, id = 1:332) {
  y <- vector()
  for(i in 1:length(id)){
    x <- id
    y <- c(y, sum(complete.cases(
      read.csv(as.character(paste0(directory,"https://stackoverflow.com/","f",id[i],".csv"))))))
  }
  df <- data.frame(x, y)
  colnames(df) <- c("id","ret2")
  return(df)
}

You can call this function like this:

myfunc("name-of-your-directory",25:87)

An explanation of the above code. You have to break down your problem into steps:

  1. You need a vector of the id’s, that’s done by x <- id
  2. For each id you want the number of complete cases. In order to get that, you have to read the file first. That’s done by read.csv(as.character(paste0(directory,"https://stackoverflow.com/","f",id[i],".csv"))). To get the number of complete cases for that file, you have to wrap the read.csv code inside sum and complete.cases.
  3. Now you want to add that number to a vector. Therefore you need an empty vector (y <- vector()) to which you can add the number of complete cases from step 2. That’s done by wrapping the code from step 2 inside y <- c(y, "code step 2"). With this you add the number of complete cases for each id to the vector y.
  4. The final step is to combine these two vectors into a dataframe with df <- data.frame(x, y) and assign some meaningfull colnames.

By including the steps 1, 2 and 3 (except the y <- vector() part) in a for-loop, you can iterate over the list of specified id’s. Creating the empty vector with y <- vector() has to be done before the for-loop, so that the for-loop can add values to y.

More Related Contents:

  1. Update data frame via function doesn’t work
  2. Repeat each row of data.frame the number of times specified in a column
  3. Pass a data.frame column name to a function
  4. How to convert a list consisting of vector of different lengths to a usable data frame in R?
  5. Assign multiple columns using := in data.table, by group
  6. Filtering a data frame on a vector [duplicate]
  7. How to replace NA values in a table for selected columns
  8. Remove an entire column from a data.frame in R
  9. Selecting multiple odd or even columns/rows for dataframe
  10. Deleting reversed duplicates with R
  11. Select every nth row from dataframe
  12. duplicates in multiple columns
  13. Extend contigency table with proportions (percentages)
  14. R function with no return value
  15. R self reference
  16. Change row order in a matrix/dataframe
  17. Subsetting a data frame based on contents of another data frame
  18. Convert summary to data.frame
  19. How can I prevent rbind() from geting really slow as dataframe grows larger?
  20. Unlist a data frame by rows, not columns
  21. Deleting columns from a data.frame where NA is more than 15% of the column length [duplicate]
  22. Getting a function name as a string
  23. DT[!(x == .)] and DT[x != .] treat NA in x inconsistently
  24. Return df with a columns values that occur more than once [duplicate]
  25. Replicate each row of data.frame and specify the number of replications for each row?
  26. Count unique values for every column
  27. Convert all data frame character columns to factors
  28. How to use data.table within functions and loops?
  29. What you can do with a data.frame that you can’t with a data.table?
  30. Override column types when importing data using readr::read_csv() when there are many columns

Leave a Comment