lapply

1熱

2答えて

スノーパッケージのparXapply（）関数は、データが1つのリストまたはマトリックスにしか含まれていないときには非常にうまく配布しますが、この場合は4つの異なるタイプのマトリックスで関数を実行する必要があります。例えば、これは私が今持っているものです。 res.list = parLapply(cl, mynames, myfun, listA, listB, listC, listD)

11熱

1答えて

Rのlapply（およびmclapply）で乱数ジェネレータの状態を復元するにはどうすればよいですか？

Rは嘆願書の中の設定.Random.seedを無視します。ただし、set.seedを使用すると正常に動作します。いくつかのコード： # I can save the state of the RNG for a few seeds seed.list <- lapply(1:5, function(x) { set.seed(x) seed.state

2熱

1答えて

igraphを使用する：decompose.graph（）によって構築されたコンポーネントのコミュニティメンバシップ

decompose.graph、コミュニティ検出機能igraphおよびlapplyを使用していただきありがとうございます。私は頂点属性 "label"とエッジ属性 "weight"を持つigraphオブジェクトGを持っています。私は、igraphとは異なる機能を使ってコミュニティメンバーシップを計算したいと思います。簡略化のため、walktrap.communityとしましょう。このグラフが接

0熱

1答えて

複数のファイルに対してstrsplit関数を適用する

誰かが私のコードのステップ4で間違っていることを確認できますか（strsplit）？私は、リストでそれらを読んで、名前を分割し、3を追加しようとしている3名の「101_E45_N66.csv」はディレクトリ内のファイル、「102_E46_N76.csv」、「103_E47_N86.csv」を持っています：= N936410 = E904690、「北距」「を偏東」は、例えば、各ファイルの新しい

1熱

1答えて

はllplyにリスト引数を渡します

私はこの質問に対する満足のいく回答は見つかりませんでした。私は関数がいると仮定： foo <- function(a,b,c) { ... } aは、多くのdata.frameオブジェクト bを含むリストは、（それがいずれかの場合に役立ちます、ライブラリspatstatからクラスppp）データの特別なクラスを含むリストがされています。 cは整数です。は、と私はその機能によってリストをプッ

7熱

2答えて

リスト内の各要素をテストする場合

は私がリストを持っていると仮定します。 alist<- list(4,6,8,9) 各リスト要素があれば7より大きく、その真の場合は1のリストを返し、0であれば、私はテストをしたいに偽です。しかし、私はlapplyを使用する必要があります。 lapply(alist,if,>7,1) or lapply(alist,if,cond>7,1) もちろん、次のエラーは発生しません。 Erro

2熱

1答えて

adjustOHLC - テロップの文字ベクトルをループするソリューションが必要

私がやりたいことはかなり簡単ですが、私はそれを理解することができませんでした。私は私がアウトラインに似た何かをすることができると思ったhere 私はgetSymbolsによって返されるxts OHLCオブジェクトであるティッカーの文字ベクトルを持っています。私は分割を調整するために、シンボルの各ティッカーをループにしたいとadjustOHLCにシンボルを渡す： symbols = c("FCX",

34熱

5答えて

lapply関数のリスト名にアクセスして保存する

lapply関数内のリスト名にアクセスする必要があります。それは私が私の機能で、各リストの要素名を取得できるようにするには、リストの名前を反復処理すべきであると述べていますどこ私は、オンラインでいくつかのスレッドを見つけた： > n = names(mylist) > mynewlist = lapply(n, function(nameindex, mylist) { return(mylis

2熱

2答えて

このRスニペットをより速く、より多くのR-ishにするにはどうすればいいですか？

他のさまざまな言語から来ていますが、私はRが強力で直感的ですが、私はその性能に驚くことはありません。そこで、私が書いたスニペットを改善し、Rでコーディングする方法を学ぶことにしました。これは、ベクトルがバイナリ値（2つの異なる値か1つの値）かどうかを調べるために書いた関数です。ない： isBinaryVector <- function(v) { if (length(v) == 0)

5熱

2答えて

リストの要素に平均関数を適用する方法R

リストがあり、その要素の平均を計算するのにlapply()を使用したいと思います。 >list[[7]] [1] 1 1 1 1 1 1 1 1 1 1 を、私の出力は次のようになります：たとえば、リストの第七項目のために私が持っている > mean(temp[[7]][1:10]) [1] 1 をしかし、私はその結果以下のようなlapply()を使用するときに何か他のものになります。