条件分岐を実施した上で文字列置換を行いたい

Question

前提

データベースの前処理を実施しております。添付データフレーム
前処理中にコードを記載しておりますが、うまく思うような結果となりません

実現したいこと

ある列の条件に合致する場合に、他の列のある文字を置換したいと考えております。
具体的には、idにてグループ化したものでd列の１に該当する場合に、Product列の
NをNCに変更したいと考えております。NCに変更後、該当するid７のProductの行の
Cを削除予定です。

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

意図したものと異なる結果がかえってきます

該当のソースコード

①newdataset1<-newdataset %>% group_by(id) %>%
mutate(product=case_when(
d==1 "NC",
TRUE"else"
))
②newdataset1 <-newdataset %>% group_by(id) %>%
mutate(product = if_else(str_detect(d,1),
"NC"))

### 試したこと

上記①と②のコードを試してみましたが、うまく結果が得られていません。
同サイトの同様の質問も確認しましたが、そちらでもうまくいきませんでした。

ご教示をいただけますと幸いです。

Answer 1

replace を使ってみました。

newdataset1<-newdataset %>% group_by(id) %>%
             mutate(product = replace(product, d == 1 & product == "N", "NC"))

結果(id = 7 の部分のみ)は以下の様になるのですが、NC に変更されるのは最初の行のみになります。

7 NC      2020-12-01       1     1
7 C       2020-12-02       2     1
7 A       2021-06-01       3     1

Comments

[keikmyo]

いつもご教示いただきましてありがとうございます。
色々、ネット検索などで、replace関数はヒットしなかったので、勉強になりました。