[解決済み】apply()とadply()の出力が異なる件)
2022-01-30 23:38:14
質問
なぜかわからないのですが
adply()
を返します。
data.frame
は元の変数を含んでいるのに対し
apply()
がない。基本的には以下のような感じです。
adply()
mutate()
library(pacman)
p_load(plyr)
g_loadings = c(.50, .60, .80,
.60, .70, .60,
.80, .50, .30)
group_1_loadings = c(.50, .50, .50,
0, 0, 0,
0, 0, 0)
group_2_loadings = c(0, 0, 0,
.50, .50, .50,
0, 0, 0)
group_3_loadings = c(0, 0, 0,
0, 0, 0,
.50, .50, .50)
d = data.frame(g_loadings,
group_1_loadings,
group_2_loadings,
group_3_loadings)
adply()
:
{{コード
リターン
adply(d, 1, function(x) {
var_g_group = sum(x^2)
var_remain = 1 - var_g_group
loading_specificity = sqrt(var_remain)
return(loading_specificity)
}
)
{{コード :
{{コード
リターン
g_loadings group_1_loadings group_2_loadings group_3_loadings V1
1 0.5 0.5 0.0 0.0 0.7071068
2 0.6 0.5 0.0 0.0 0.6244998
3 0.8 0.5 0.0 0.0 0.3316625
4 0.6 0.0 0.5 0.0 0.6244998
5 0.7 0.0 0.5 0.0 0.5099020
6 0.6 0.0 0.5 0.0 0.6244998
7 0.8 0.0 0.0 0.5 0.3316625
8 0.5 0.0 0.0 0.5 0.7071068
9 0.3 0.0 0.0 0.5 0.8124038
なぜ
{コード
と同じものを返します。
apply()
?
解答方法
これらの命名規則
apply(d, 1, function(x) {
var_g_group = sum(x^2)
var_remain = 1 - var_g_group
loading_specificity = sqrt(var_remain)
return(loading_specificity)
}
)
は配列を操作して
{コード
. を使用することができます。
[1] 0.7071068 0.6244998 0.3316625 0.6244998 0.5099020 0.6244998 0.3316625 0.7071068 0.8124038
adply()
apply()
plyr
関連
-
[解決済み】エラー:'dimnames' [2]の長さが配列の範囲と等しくない [終了しました]
-
[解決済み】R: 複数行の ggplot2 コマンドで「単項演算子エラー」が発生する。
-
[解決済み】'builtin'型のオブジェクトはsubsetableではない【重複
-
[解決済み】添え字付き代入でNAを使用することはできません
-
[解決済み】Rでの関数の最適化(L-BFGS-Bでは'fn'に有限の値が必要)。
-
[解決済み】apply()とadply()の出力が異なる件)
-
[解決済み】ggplotのエラー。関数型オブジェクトのスケールを自動的に選択する方法がわかりません。
-
[解決済み】RでAIC中に行数が変化するのはなぜですか?そうならないようにするにはどうしたらいいですか?
-
[解決済み】Rで文字ベクトルから引用符を削除する
-
[解決済み] グループ化関数(tapply、by、aggregate)と*applyファミリ
最新
-
nginxです。[emerg] 0.0.0.0:80 への bind() に失敗しました (98: アドレスは既に使用中です)
-
htmlページでギリシャ文字を使うには
-
ピュアhtml+cssでの要素読み込み効果
-
純粋なhtml + cssで五輪を実現するサンプルコード
-
ナビゲーションバー・ドロップダウンメニューのHTML+CSSサンプルコード
-
タイピング効果を実現するピュアhtml+css
-
htmlの選択ボックスのプレースホルダー作成に関する質問
-
html css3 伸縮しない 画像表示効果
-
トップナビゲーションバーメニュー作成用HTML+CSS
-
html+css 実装 サイバーパンク風ボタン
おすすめ
-
[解決済み】R:関数に有限な'ylim'値が必要
-
[解決済み】基本 - T-検定 -> グループ化因子は正確に2水準でなければならない
-
[解決済み】model.frame.defaultでのエラー:変数の長さが異なる
-
[解決済み】数学関数への非数値引数
-
[解決済み】R - if文の引数の長さが0である。
-
[解決済み】Rで「パッケージ'FILE_PATH'のインストールで終了ステータスが0でなかった」。
-
[解決済み】ベースグラフィックスでプロットエリアの外側に凡例をプロットする?
-
[解決済み】reshape2 meltの警告メッセージ
-
[解決済み】R 置換する項目数が置換長の倍数でない/しかし結果は正しい
-
[解決済み】 if/while (条件) {: TRUE/FALSEが必要な場所に値がない場合のエラー