SHARE
TWEET

Untitled

a guest Aug 13th, 2017 45 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. library(tools)
  2. setwd("/Users/sbpollock/Desktop/test")
  3. list <- list.files()
  4. df <- data.frame(list[1],md5sum(list[1]))
  5. for (n in 2:length(list)) {
  6.     df[nrow(df)+1,] <- c(list[n],md5sum(list[n]))
  7. }
RAW Paste Data
Top