mapply

    0

    1答えて

    コードの一部を分かりましたが、以下で説明しますが、関数を繰り返し実行するのは難しいファイルの一覧: library(Hmisc) filter_173 <- c("kp|917416", "kp|835898", "kp|829747", "kp|767311") # This is a vector of values that I want to exclude from the file

    1

    2答えて

    私は、各行がスタディの参加者を表すデータフレーム(dat)を持っています。各参加者(「コード」)には、性別(「性別」)と年齢(「年齢」)、テスト結果を示す列(「v.1」など)を示す列があります。データフレームは、このようなものになります。テスト結果の各列に対して > dat code sex age v.1 v.2 1 A1 m 8 4 9 2 B2 f 12 7 2 を、私は8

    0

    1答えて

    私はPython dictのようなリストを使用しようとしていますが、これは関数が実行されるたびに追加できます。最終的には、データフレーム内のすべての行にこの関数を適用したいと考えています。私はいくつかのデータ上で個別に実行すると、この作品 foo <- vector(mode="list", length=2) names(foo) <- c("Larry", "Bob") myfun <-

    0

    2答えて

    私はいくつかの同様の答えを見たことがありますが、私がしようとしていることは実際には何もしません。私は多くの入力を持つ関数を持っており、関数に入力用に名前のついた列を持つデータフレームを与えることができるようにしたいと考えています。以下の例 my.fun <- function(alpha,beta,gamma,delta){ phi = (alpha + beta*gamma)/delt

    2

    1答えて

    私が作成している光沢のあるアプリケーションで、mapply関数を使って2つのリストを一緒に追加しようとしていますが、実行しようとする度に次のエラーが表示されますそれ。ここで ERROR: object 'SIMPLIFY' not found は、私は、この問題を引き起こす可能性のあるもののための損失では全くしていますので、 addedUp <- mapply("+", a, b, SIMPL

    2

    2答えて

    mapplyが日付を倍に変更しないようにするにはどうすればよいですか? は、これは私が何を意味するかです: datedf<-data.frame(y=as.character(rep(2010,12)),m=as.character(seq(1,12,1)),stringsAsFactors=FALSE) head(datedf) yyyymm_to_date<-function(y,m)

    0

    2答えて

    私はこの形をとるベクトルのリストを持っている: > g [[1]] [1] "L" "14" "L" "39" "L" "61" "B" "0" "L" "15" "L" "59" "W" "64" [[2]] [1] "L" "62" "D" "31" "L" "10" "L" "30" "B" "0" "D" "45" "L" "43" [[3]] [1] "H" "0" "L

    1

    3答えて

    mapplyでこの問題を解決しようとしていましたが、この作業をするためにいくつかのネストされたアプリケーションを使用する必要があります。本当の混乱。 問題は次のとおりです。 データフレームには約400個のキーワードが含まれています。これらはおよそ15のカテゴリに分類されます。 データフレーム2には、文字列の説明フィールドと、データフレーム1に記載されているカテゴリにそれぞれ対応する15個の追加の列

    0

    1答えて

    長さ10のリスト(例: "abc")から一連の非冗長要素ペアの交差を評価しようとしていますが、各要素のために、長さ20を有する2つの整数のベクトルを含み、以下に示すように、(例えば2)以上の一定数以上有している交差点のためのペアインデックスのベクトルを生成する:私は疑問に思って set.seed(42) abc <- replicate(10, list(sample(1:100, 20), s

    2

    2答えて

    私は計算に時間がかかり、その実行をパラレル化しようとしているスクリプトを持っています。 スクリプトは、基本的にデータフレームの各行をループし、以下に示すように、いくつかの計算を行う: my.df = data.frame(id=1:9,value=11:19) sumPrevious <- function(df,df.id){ sum(df[df$id<=df.id,"value"