R言語で引数を受け取り、その数値の二乗を返す関数

1. 単純な関数の作成:

   square <- function(x) {
   return(x^2)
   }

   この関数は、引数として与えられた数値を二乗して返します。例えば、square(3)を呼び出すと、9が返されます。

2. apply関数を使用する方法:

   numbers <- c(1, 2, 3, 4, 5)
   squared_numbers <- sapply(numbers, function(x) x^2)

   この方法では、apply関数を使用して配列やベクトルの要素ごとに関数を適用します。上記の例では、numbersベクトル内の各要素を二乗して、squared_numbersベクトルに格納します。

3. purrrパッケージを使用する方法:

   library(purrr)
   numbers <- c(1, 2, 3, 4, 5)
   squared_numbers <- map_dbl(numbers, ~ .x^2)

   purrrパッケージは、関数型プログラミングのための便利なツールを提供します。上記の例では、map_dbl関数を使用して、numbersベクトル内の各要素を二乗し、squared_numbersベクトルに格納します。

これらは、R言語で引数を受け取り、その数値の二乗を返す関数を作成するいくつかの方法です。選択肢に応じて、最適な方法を選んでください。