data.tableで複数列の代入を行う

Question

前提・実現したいこと

data.tableで複数列の代入を行いたい。

• year, id, deg, clo の4列から成るデータフレームdf_outputを作成。

　※データテーブルを使いたかったので、変換。

• year, idは、予め必要な組み合わせを設定。
• deg, cloの2列に、算出した結果を代入したい。（df_outputには適当な値（-1）を置いた。）
• df_outputに算出結果deg_x, clo_xを代入したい。

　※(year==2018)&(id==555)は、とりあえずの具体例。

degのみ（代入する列1つのみの場合）は、問題なく実行できている。

df_output <- data.frame(code=eg$Var1, id=eg$Var2, deg=-1)
df_output[(year==2018)&(id==555), deg:=deg_x]

よろしくお願い致します。

該当のソースコード

install.packages("data.table")
library(data.table)

d <- read.csv(file='test.csv', header=T, sep=",", fileEncoding = "UTF-8")

# year, id, deg, clo の4列から成るdf_outputを作成
list_code <- unique(d$year)       #年度
list_id <- unique(d$id)　　　　    #企業ID
eg <- expand.grid(list_year, list_id)　　#year, idで重複あり組み合わせ
df_output <- data.frame(code=eg$Var1, id=eg$Var2, deg=-1, clo=-1)　#dataframe作成 #deg, cloが算出結果
df_output <- data.table(df_output)

#deg, cloの算出
deg_x <- deg算出結果
clo_x <- clo算出結果

#data.tableへの代入
df_output[(year==2018)&(id==555), deg:=deg_x, clo:=clo_x]

発生している問題・エラーメッセージ

 `[.data.table`(df_output, (code == i_code) & (id ==  でエラー: 
  Provide either by= or keyby= but not both

Answer 1

https://sodocumentation.net/ja/r/topic/849/%E3%83%87%E3%83%BC%E3%82%BF%E8%A1%A8

これに書いてありました！