如何使用rowwise与if ifse的do函数一起使用？

Question

我的数据框包含列，即列表。

数据框包含json响应为列，第二列是使用以下代码从JSON转换的列表。

vectorize_fromJSON <- Vectorize(fromJSON, USE.NAMES=FALSE)
z <- vectorize_fromJSON(data_df$json_response) 

我使用rowwise和do函数来提取列表信息。

但是，我无法使用它。

工作代码

t <- data_df %>% rowwise %>% do(
   test = class(.$json_list$cbas$dslscc)
)

我想要如下内容：

t <- data_df %>% rowwise %>% do(
     test = ifelse(class(.$json_list$cbas$dslscc)=="list", TRUE,    
     .$json_list$cbas$dslscc)
)

以下是错误：

  

错误   。$ json_list $ clear_bank_attributes $ days_since_last_successful_check_cashed $零   ：$运算符对原子向量无效