Запись для l oop для выполнения той же функции в файлах в папке - PullRequest
Новая
       7

Запись для l oop для выполнения той же функции в файлах в папке

0 голосов
/ 19 марта 2020

когда я запускаю функцию nw c для файла, она работает, как показано, но я хочу, чтобы l oop вызывал все файлы в папке для выполнения функции nw c. Это не работает. Мы будем благодарны за любую помощь. 

nwc(nxmar_18)

#$Alloc_Matrix
# A tibble: 3 x 4
#     D1    D2    D3    D4
#  <dbl> <dbl> <dbl> <dbl>
#1     6     5     0     0
#2     0     5     8     0
#3     0     0     4    15

#$Total_Cost
#    D1
#1 1095

Не работает в течение l oop. показывая эту ошибку 

cost_aloc <- vector("double", length(mar_18))
for(p in mar_18){
  nxmar_18 <- read_excel(p)
  nxmar_18 <- nxmar_18[, -1]
  cost_aloc[p] <- nwc(nxmar_18[[p]])
  write.xlsx(cost_aloc, file = "out_put_8.xlsx")
  print(cost_aloc)
}

Новые имена: * `` -> ... 1 Ошибка в -nrow (ex_matrix): неверный аргумент для унарного оператора

...