関数内で "NULL（空）"を0に設定する方法R

Question

私は売上を扱う関数を書いていますが、そのメソッドの売上がないのでRはnull（空）を返します。ゼロ？そのリストの値をリスト内で使用し、リストが他のリストと並んでいる場合は、リストの長さが長くない場合は、リストを再び開始してダッシュボードを駄目にします。例：

s1<- c("sales_method1", "sales_method3") 
s2<- c(50, 100) 
df<-data.frame(s1, s2) 

my_function <- function(df){ 

breakdown_of_sales <- lapply(split(df$s2, df$s1), sum) 

sales_method1 <- breakdown_of_sales$sales_method1 
sales_method2 <- breakdown_of_sales$sales_method2 
sales_method3 <- breakdown_of_sales$sales_method3 

list <- c(sales_method1, sales_method2, sales_method3) 

Pot <<- matrix(`list`, 
       nrow = 1, 
       ncol = 3) 
} 

これは、私はそれがnullであるとき、それは0に等しくなるようにデフォルトにしたいとき、私の鍋にそれを作る、50,100,50を含有させること、50、100、50

sales_method2 <- breakdown_of_sales$sales_method2 

として戻っヌルを返します。 50,0,100

Answer 1

これはあなたが望むかどうかわかりません。しかし、私はそれを試して働いた。

s1<- c("sales_method1", "sales_method3") 
s2<- c(50, 100) 
df<-data.frame(s1, s2) 

my_function <- function(df){ 

    breakdown_of_sales <- lapply(split(df$s2, df$s1), sum) 

    sales_method1 <- breakdown_of_sales$sales_method1 
    sales_method2 <- breakdown_of_sales$sales_method2 
    sales_method3 <- breakdown_of_sales$sales_method3 
    sales_method <- list(sales_method1, sales_method2, sales_method3) 
    for(i in 1:length(sales_method)){ 
     if (any(is.null(sales_method[[i]]))){ 
      sales_method[[i]] <- 0 
     } 
    } 


    list <- sales_method 



    Pot <<- matrix(`list`, 
        nrow = 1, 
        ncol = 3) 
}