R言語で最大値を持つセルを埋める方法


  1. apply()関数を使用する方法:

    # データフレームの作成
    df <- data.frame(A = c(1, 2, 3),
                 B = c(4, 5, 6),
                 C = c(7, 8, 9))
    # apply()関数を使用して最大値を持つセルを埋める
    df_filled <- apply(df, c(1, 2), function(x) ifelse(x == max(x, na.rm = TRUE), x, NA))

    この例では、apply()関数を使用してデータフレームの各セルに対して関数を適用します。関数は各セルの値が最大値と等しい場合にはそのままの値を、そうでない場合にはNAを返します。

  2. dplyrパッケージを使用する方法:

    library(dplyr)
    # データフレームの作成
    df <- data.frame(A = c(1, 2, 3),
                 B = c(4, 5, 6),
                 C = c(7, 8, 9))
    # mutate_all()関数を使用して最大値を持つセルを埋める
    df_filled <- df %>% mutate_all(~ifelse(. == max(., na.rm = TRUE), ., NA))

    この例では、dplyrパッケージのmutate_all()関数を使用してデータフレームの各セルに対して関数を適用します。関数は各セルの値が最大値と等しい場合にはそのままの値を、そうでない場合にはNAを返します。