0

csvデータを読み込んで,mutate()if_else()を使って新しい列を追加しようとしています.
一つ前の行の値を参照してmutete()を行う方法を,こちらでお教えいただきました.

こちらの続きなのですが,mutate()で追加中の値を参照する方法はあるのでしょうか.

csvデータは20行あります.

ex.csv

name value
hoge 5
huga 7
piyo 4
puka 2
...

コード

library('tidyverse')
d <- read.csv('ex.csv', sep = '\t', header = T)
d2 <- d %>%
    mutate(num = if_else(row_number() > 1 & lag(name) == 'hoge',
                         lag(num) + value,
                         value))

エラー

<error/dplyr:::mutate_error>
Error in `mutate()`:
ℹ In argument: `num = if_else(...)`.
Caused by error:
! object 'num' not found
---
Backtrace:
     ▆
  1. ├─d_test %>% ...
  2. ├─dplyr::mutate(...)
  3. ├─dplyr:::mutate.data.frame(...)
  4. │ └─dplyr:::mutate_cols(.data, dplyr_quosures(...), by)
  5. │   ├─base::withCallingHandlers(...)
  6. │   └─dplyr:::mutate_col(dots[[i]], data, mask, new_columns)
  7. │     └─mask$eval_all_mutate(quo)
  8. │       └─dplyr (local) eval()
  9. ├─dplyr::if_else(...)
 10. └─dplyr::lag(len2)
Run rlang::last_trace(drop = FALSE) to see 3 hidden frames.

類似の質問の繰り返しになり恐縮です.
どうぞよろしくお願いいたします.

0

この質問に回答するには、ログインする必要があります。

のタグが付いた他の質問を参照する。