do.call

    2

    1答えて

    私は2つの列で区切られたrmarkdownを使って任意の数の棒グラフをプロットしようとしています。私の例では、私はこれは私が「HTMLにニットしかし、私はこれはgrid.arrange plot.categoric = function(df, feature){ df = data.frame(x=df[,feature]) plot.feature = ggplot(df,

    0

    1答えて

    私はいくつかのBoxCoxラムダパラメータを計算しようとしています。下記のコード行を使用したいくつかの時系列のリストです。私は以下のエラーが発生しています。私は誰もが感謝する問題を指摘することができる場合、運がないとエラーをグーグルで試してみました。 Code: testRun<-do.call(BoxCox.lambda, args=ListData) Error in (function

    0

    1答えて

    データセットをvcdパッケージから使用して、1つのホットエンコーディングを実行しています。これを行うにはpurrr::dmap_ifとMatrix::model.matrixを一緒に使用したいと思います。私が走るとき do.call(model.matrix, list(Improved~.,Arthritis)) うまく動作します。 私はコードの下に使用dmap_ifは1時間のデータセットの

    0

    2答えて

    JSONを3列のdata.frameに正しく変換しようとしています。 これは私がこれはdata.frame # my solution my_data <- data.frame(fruit = do.call(c, my_data), bag_number = rep(1:length(my_data), sapply(my_data, length))) # how

    0

    2答えて

    私はdo.callをだましています。 I = iris do.call(what = "plot", args = c(I$Sepal.Length ~ I$Sepal.Width)) # This seems fine p = list(x = I$Sepal.Length, y = I$Sepal.Width) do.call(what = "plot", args = p) #

    2

    1答えて

    複雑な関数をlapplyすることによって生成されるデータフレーム(outputDfList)の大きなリストをrbindしようとしています。大きなテーブル。 Error in pi[[j]] : subscript out of bounds 私は二重の各データフレームの列番号を確認し、それらがすべてある:私のコードは do.call(rbind, outputDfList) 私が受信したエ

    0

    1答えて

    ユーザ入力に基づいてデータセットを注文したいと思います。 ユーザ入力は、以下のcolsと呼ばれる(列名の)文字配列になります。 dataset1[do.call('order', as.list(dataset1[cols])),] これは問題なく動作します。私は注文の方向(降順または昇順)を追加しようとしていますが、私は同じエラーを取得し続けます: "未使用の引数(降順= TRUE)"。 誰

    1

    1答えて

    prop.table & do.callの組み合わせを使用して、rの各列の0,1,2,3のパーセンテージを計算しようとしています。 tblpercent <- function(x){ round(prop.table(table(x)),4) } do.call(cbind,lapply(A,tblpercent)) しかし、列の一部が、0-3のフルセットが含まれていない、例

    0

    2答えて

    は、私は2列によって行列Xの列のリストと呼ばれるlist_of_matrices_by2私はall_pairs行列内のすべての私の行列をスタックしたい list_of_matrices_by2[1:3] [[1]] [,1] [,2] [1,] "7204" "d" [2,] "7204" "a" [[2]] [,1] [,2] [1,] "2032" "b" [2,] "203

    1

    1答えて

    多くの列の名前を変更したい。今度は、各列の文章を書き換えます。 df <- data.frame(col1 = 1:4, col2 = c('a', 'b', 'c', 'd'), col3 = rep(1,4)) df %>% rename(col1 = col1_new) %>% rename(col2 = col2_new) %>% rename(col3 =