如何使用slackr: error in UseMethod("tbl_vars")修复此错误:没有适用于“tbl_vars”的方法应用于"NULL“类的对象
问题描述： 如何使用slackr: error in UseMethod("tbl_vars")修复此错误:没有适用于“tbl_vars”的方法应用于"NULL“类的对象？
回答： 这个错误是由于在使用slackr包时出现了问题。具体来说，错误信息指出在"NULL"类的对象上没有适用于"tbl_vars"的方法。
要修复这个错误，可以尝试以下几个步骤：
- 确保已经正确安装了slackr包。可以使用以下命令安装slackr包：
install.packages("slackr")- 确保已经正确加载了slackr包。可以使用以下命令加载slackr包：
library(slackr)- 检查是否正确设置了slackr的配置信息。在使用slackr之前，需要先设置slackr的配置信息，包括Slack的Webhook URL等。可以使用以下命令设置slackr的配置信息：
slackr_setup(channel = "#your_channel", webhook_url = "https://hooks.slack.com/services/your_webhook_url")请注意替换#your_channel为您要发送消息的Slack频道，https://hooks.slack.com/services/your_webhook_url为您的Slack Webhook URL。
- 如果上述步骤都没有解决问题，可以尝试更新slackr包到最新版本。可以使用以下命令更新slackr包：
install.packages("slackr")如果问题仍然存在，请检查您的代码是否正确使用了slackr包的函数。可以参考slackr包的官方文档和示例代码来确保正确使用slackr包。
总结： 修复slackr: error in UseMethod("tbl_vars")错误的步骤包括：安装slackr包、加载slackr包、设置slackr的配置信息、更新slackr包到最新版本，并确保正确使用slackr包的函数。
腾讯云相关产品和产品介绍链接地址： 腾讯云提供了丰富的云计算产品和服务，包括云服务器、云数据库、云存储等。您可以访问腾讯云官方网站获取更多关于腾讯云产品的详细信息和文档。
腾讯云官方网站：https://cloud.tencent.com/
请注意，以上答案仅供参考，具体解决方法可能因个人环境和需求而异。建议在遇到问题时查阅相关文档和寻求专业人士的帮助。
相关·内容
我想要删除列值的最后5%，并将条目与前5%的值一起翻一番。我试过：
top_n(sa$Net,5)
但我只收到这样的信息：
Error in UseMethod("tbl_vars") :
no applicable method for 'tbl_vars' applied to an object of class "c('double', 'numeric')"
我已经安装并装载了dplyr
浏览 3提问于2018-10-23得票数 0
回答已采纳
我有一个数据框架，其中有一个列，我想使用它来连接另一个数据框架。列以字符串和字符串的形式包含数字，如下所示：
x<-data.frame(referenceNumber=c("80937828","gdy","12267133","72679267","72479267"))
如何将数字转换为字符串，并将字符串替换为0/null？
我试过x %>% mutate_if(is.character,as.numeric)
但是它返回以下错误：
“UseMethod中的错误”(“tbl_vars”)：不适用
浏览 0提问于2019-06-07得票数 1
回答已采纳
1回答
我从csv文件中获得了如下所示的myDate数据：
start end
2017-07-22 04:00:00 2017-08-05 04:00:00
2014-05-16 17:00:00 2014-05-25 18:40:00
2018-12-13 22:00:00 2018-12-18 07:59:59
我还创建了另一个以天为单位的列：
library(tidyverse)
myDate$duration <- as.numeric(difftime(parse_datetime(myDate$end, "%Y-%
浏览 1提问于2019-10-31得票数 2
回答已采纳
使用模拟，我想测试/演示“审查”数据的效果，在某些情况下，我们无法获得，或者情况的值超出了我们仪器的测量范围。
在这里，我想根据一个数字变量的等级分数将案例标注为“观察的”或“未观察的”。
到目前为止，我的尝试将表与元素值混为一谈，但我不知道下一步该尝试什么。我敢肯定，当我看到一些建议时，会很简单。
## generate some data
n_rows <- 20
x <- rnorm(n_rows)
status <- rep("unobserved", n_rows)
data <- data.frame(x, status)
library
浏览 0提问于2021-12-02得票数 1
回答已采纳
我目前正在尝试创建一个slack -R集成，以便在达到特定规则/阈值时创建警报。我使用的是slackr包(v2.1.0) 现在唯一有效的功能是slackr::slackr_bot，因为它成功地将机器人消息发送到私有通道。 start <- paste0("Start checking the anomaly")
slackr::slackr_bot(start, incoming_webhook_url=whurl ) 并返回一个松弛的通知如下： ? 当我尝试用下面的命令设置初始slackr_setup时(我认为更多的功能需要它，比如发送图像，post)，它总是出错
浏览 20提问于2021-01-26得票数 1
回答已采纳
1回答
我正在尝试映射数据帧列表，但我做错了一些事情。我的环境中有多个数据帧，我的目标是用NA值替换所有的空字符串，我正在做的事情如下： # create a list of my dataframes
lst <- ls()
lst<- lst[sapply(lst, function(x) is.data.frame(get(x)))]
# second, map my function on all of my dataframes
map(lst, ~.x %>% mutate_if(is.character, list(~na_if(.,"")))) 我
浏览 36提问于2020-12-16得票数 2
回答已采纳
1回答
我正在使用松弛包发布消息给斯拉克。我有以下代码，在函数外部(即将两条消息(两次)发送到Slack)时工作，但在函数中使用时，使用函数外部的变量值，而不是函数中设置的变量值。
一个例子将有助于说明。
> n = 2
>
> # Run a loop, send to slack. Display content.
> aMsg <- NULL
> for ( i in 1:n ) {
+ msg <- NULL
+ msg <- paste0("Completed ", i, " iteration from l
浏览 2提问于2015-07-29得票数 0
回答已采纳
我有一个数据集，其中许多字符列应该是因子。我可以通过它们中唯一值的数量来判断它们是什么。
为了将这些列更改为factor，我尝试了：
mutate_if((is_character(.) & n_distinct(.) <=10), as_factor)
但是得到了
Error in tbl_if_vars(.tbl, .p, .env, ..., .include_group_vars = .include_group_vars) : length(.p) == length(tibble_vars) is not TRUE
我也试过了：
mutate_all(~ if_els
浏览 1提问于2019-08-17得票数 2
我一直在努力地使用dplyr应用自定义函数到一个tibbles列表中。下面的代码片段使用for循环工作得很好：
df <- list(as_tibble(head(mtcars[, 1:2])), as_tibble(tail(mtcars[, 1:2])), as_tibble(mtcars[13:18, 1:2]))
for (d in seq_along(df)) {
df[[d]] <- df[[d]] %>% rename_all(toupper)
}
根据purrr文档，map："(…)迭代地将函数应用于列表或向量的每个元素“，但抛出一个错误：
浏览 2提问于2018-12-28得票数 2
回答已采纳
当ID在同一年和月内有多个年龄时，我希望将观察到的年龄中的较大者放在新列"MAX_AGE“中。
library(tidyverse)
ID <- c(1,1,1,2,2,2,2,3,3)
YEAR <- c(2019,2019,2019,2019,2019,2019,2019,2019,2019)
MONTH <- c(3,3,3,6,6,6,7,2,2)
AGE <- c(18,18,19,10,10,11,11,33,33)
tb <- tibble(ID, YEAR, MONTH, AGE)
tb %>%
group_by(ID,
浏览 36提问于2020-02-05得票数 0
回答已采纳
我在R中有一个简单的数据帧df：
year, var1, var2, var3
1990, 23, 1, 133
1991, 25, 3, 120
1992, 28, 2, 110
...
数据持续数百行。
我想在R中使用apply()和top_n()为var1、var2、var3选择前10个值，如下所示：
df %>%
select(var1, var2, var3) %>%
apply(2, top_n(10), na.rm = TRUE)
但是我得到了错误：Error in UseMethod("tbl_vars"): no applicable meth
浏览 0提问于2020-06-03得票数 0
我的数据框架如下所示
value <- c(0,0.1,0.2,0.4,0,"0.05,",0.05,0.5,0.20,0.40,0.50,0.60)
time <- c(1,1,"1,",1,2,2,2,2,3,3,3,3)
ID <- c("1,","2,","3,",4,1,2,3,4,1,2,3,4)
test <- data.frame(value, time, ID)
test
value time ID
1 0 1 1,
2 0.1 1 2
浏览 1提问于2021-01-31得票数 1
回答已采纳
我试图将列表对象中的因素转换为字符。
我的第一次尝试是将purrr::map与mutate_if(is.factor,as.character)结合起来，但这是行不通的。我在谷歌上搜索了错误信息，但没有找到我的问题的答案。
我求助于使用base::lapply来完成工作(它做到了)。
但是，我无法发现purrr::map方法的错误。它怎么了？
下面的代码是我所面临的情况的一个工作示例。
library(dplyr)
#>
#> Attaching package: 'dplyr'
#> The following objects are masked fro
浏览 3提问于2019-11-13得票数 1
我正在尝试创建一个用户定义的函数，以便在数据帧的每个变量中显示频率计数。
df
dummy_df <- data.frame(gender_vector = c("Male", "Female", "Female", "Male", "Male"),
color_vector = c('blue', 'red', 'green', 'white', 'black')
)
du
浏览 0提问于2021-03-07得票数 1
回答已采纳
我正在尝试第一次尝试创建一个R包。下面我有一些功能。
#' @export
overview <- function(x, ...) {
UseMethod("overview")
}
overview.query <- function(return.query, ...) {
现在，当我使用devtools::load_all() (加载所有函数)时，一切正常工作，overview.query在传递class query对象时执行。
但是重建，UseMethod再也找不到overview.query函数了(因此所有函数都没有加载)，我做错了什么
浏览 2提问于2015-08-13得票数 7
回答已采纳
我正在尝试一个闪亮的应用程序，它将选择一个数据集，我正在尝试一种格式，如尺寸和测量，如tableau。我能够获得所有列，但我需要区分数字和字符数据类型。下面是代码。
“”“
server <- function(input, output,session){
data_set <- reactive({
inFile <- input$InputFile
if (is.null(inFile))
return(NULL)
data_set<-read.csv(inFile$datapath, header=input$header)
})
observe
浏览 8提问于2021-12-02得票数 0
1回答
在使用play()函数之后，声音就会连续播放。我该怎么阻止它。下面的代码显示了我使用了pause()函数，但是这给了我一个错误消息，我也尝试使用了close()函数。
> pause(saw)
Error in UseMethod("pause") :
no applicable method for 'pause' applied to an object of class "c('Wave', 'WaveGeneral')"
浏览 2提问于2014-04-22得票数 1
回答已采纳
1回答
我想使用我创建的用户函数(使用"tbl_cross")来创建包含所有交叉表的单个word文档。
以下是数据：
library(readr)
library(magrittr)
library(gtsummary)
dat <- read_table2('Q17_1 Q17_2 Q17_3 Q17_4 survey
No Yes No Yes m1
No Yes No No m2
Yes Yes Yes Yes m1
No No Yes No m2
No No Yes Yes m1
Yes No Yes No m
浏览 17提问于2021-09-09得票数 1
mlr函数configureMlr()允许用户设置以下参数：
on.learner.error: What should happen if an error in an underlying learning algorithm is caught “warn”: A FailureModel will be created, which predicts only NAs and a warning will be generated.
检查是否返回了FailureModel的最佳方法是什么？目前我只是检查模型的类，如果不是它应该是什么，那么我假设它是一个FailureModel。
lib
浏览 1提问于2019-08-28得票数 1
回答已采纳
如果我需要根据R对象的类以不同的方式对待它们，我可以在一个函数中使用if和else：
foo <- function (x) {
if (inherits(x, 'list')) {
# Foo the list
} else if (inherits(x, 'numeric')) {
# Foo the numeric
} else {
# Throw an error
}
}
或者我可以定义一个方法：
foo <- function (x) UseMethod('foo')
foo.lis
浏览 2提问于2020-04-20得票数 2
回答已采纳
1回答
这应该很容易，但是当我跑的时候：
require(dplyr)
data.frame(a = c(1,1,1,2,2,2), b= c(1,2,3,4,5,6)) %>%
group_by(a) %>%
slice(-1:-2)
由于期望data.frame(a = c(1,2), b = c(3,6))，我收到以下错误：
Error in UseMethod("slice") :
no applicable method for 'slice' applied to an object of class "c('grouped
浏览 2提问于2019-12-11得票数 1
回答已采纳
我试图使用我自己包中的localgeo包在R中生成纬度和经度，但是，如果不显式加载包，我就想不出如何做到这一点。
如何启用package1中的函数，方便地访问package2 2的隐藏环境及其对象？
### fails
data <- data.frame(City = c("New York", "Miami", "Los Angeles"),
State = c("NY", "FL", "CA")
data <- cbind(data, localgeo::geocode(data
浏览 3提问于2019-04-22得票数 1
1回答
我对R非常陌生，正在尝试确定包含~500k点的形状文件是否随机分布。无论我在参数中输入什么，我都会得到相同的错误信息。
这是我从一开始就知道的：
> library(spatstat)
spatstat 1.40-0 (nickname: ‘Do The Maths’)
For an introduction to spatstat, type ‘beginner’
> as.ppp(area)
marked planar point pattern: 500000 points
Mark variables:
[1] OBJECTID Encoded_Ti
浏览 2提问于2015-01-28得票数 0
1回答
我已经为一个复杂的调查定义了一个逻辑模型，用样条作为变量的边界，定义了自由度，而不是节点的位置。运行该模型后：
> log3<-svyglm(compo ~ bs(edadt,degree=1, df = 3), dclus, family = quasibinomial)
我想知道bs在哪里找到了结。当我打字时：
splineKnots(log3)
我得到的是：
Error in UseMethod("splineKnots") :
no applicable method for 'splineKnots' app
浏览 4提问于2020-05-19得票数 0
回答已采纳
我有一个简单的函数，它应该使用DBI::dbConnect()连接来获取一个表。对tbl()的调用在交互会话中运行良好，我遇到了问题。
我的职能：
a2_db_read <- function(con, tbl_name, schema = "dbo"){
if(schema == "dbo"){
dplyr::tbl(con, tbl_name)
}
else{
dplyr::tbl(con, dbplyr::in_schema(schema, tbl_name))
}
}
如果我打电话给dplyr::tbl()，我会得到
浏览 1提问于2022-03-01得票数 0
回答已采纳
我得到了以下错误：
UseMethod("rescale")中的错误:没有适用于“c(‘haven_标签’，'vctrs_vctr'，‘double’)类对象的”rescale“方法
下面是我的情节代码：
ggplot(data_q_agg3, aes(x = 'qmrcms', y = 'count', fill = 'qbncap')) + geom_col(position = "dodge")
data_q_agg3是通过这样创建的(参见图)：
data_q_agg3 <- g
浏览 49提问于2021-04-30得票数 4
1回答
在将RStudio连接到Amazon Athena之后，我尝试使用show_query从幕后提取SQL语句。在我尝试使用这个函数之前，代码运行得很流畅。 library(tidyverse)
library(dplyr)
library(dbplyr)
library(odbc)
library(DBI)
library(rJava)
con <- dbConnect(noctua::athena(),
aws_access_key_id = "***",
aws_secret_access_key
浏览 9提问于2020-08-25得票数 1
回答已采纳
我想在一个循环中更改几个dfs中的列名，其中新的列名取决于df的名称：
library(dplyr)
# A simple example of my data:
dataframe_AA <- data.frame(
var1 = sample(1:3),
var2 = sample(1:3),
var3 = sample(1:3))
dataframe_AB <- data.frame(
var1 = sample(1:3),
var2 = sample(1:3),
var3 = sample(1:3))
dfs <- list(dataf
浏览 17提问于2020-03-04得票数 1
回答已采纳
1回答
外面很少有路由器，但我决定为一个非常轻的站点创建一个非常简单的路由。
这是我的index.php
$route = new Route();
$route->add('/', 'Home');
$route->add('/about', 'About');
$route->add('/contact', 'Contact');
这是我的路由器：
<?php namespace Laws\Route;
use Laws\Controller\
浏览 0提问于2015-02-18得票数 0
我正在编写一个c++程序来将添加到SASL中。虽然所有函数都返回成功，但当我手动检查文件夹的属性时，无法看到设置了任何策略。
下面是我的密码。我在下面的链接中修改了MSDN站点中给出的示例代码，以添加到SASL，而不是DACL。
BOOL SetPrivilege(
HANDLE hToken, // access token handle
LPCTSTR lpszPrivilege, // name of privilege to enable/disable
BOOL bEnablePrivilege // to enable or dis
浏览 2提问于2015-09-30得票数 1
回答已采纳
我正在尝试在R中设置slackr包，以允许我通过RStudio发布到Slack，但似乎连接不起作用。 我已经安装了包，在我的Slack Workspace中设置了所需的应用程序，有了一个webhook和访问令牌，手动授予了Slack中所需的所有Scope，设置了配置文件，并通过cmd行成功地向通道发送了一条消息，从而确认了这项工作。不幸的是，任何东西都不能通过R工作。 slackr_msg(paste("test"),
,channel = "#it-reports") slackr_ims(api_token="xoxb-...") 当运行上
浏览 30提问于2020-06-16得票数 0
下面是我的AST转换
@GroovyASTTransformation(phase = CompilePhase.SEMANTIC_ANALYSIS)
public class ASTExampleTransformation implements ASTTransformation {
public void visit(ASTNode[] astNodes, SourceUnit sourceUnit) {
astNodes.findAll {
node -> node instanceof ClassNode
}.e
浏览 4提问于2015-02-03得票数 3
这个问题与非常相似，但不同之处在于我意识到我的示例不足以描述我的问题。
我正在尝试将不同的正则表达式应用于tibble中的不同变量。例如，我创建了一个tibble清单1)我想要修改的变量名，2)我想要匹配的正则表达式，3)替换字符串。我想将正则表达式/替换应用于不同数据框中的变量。请注意，目标tibble中可能有我不想修改的变量，并且我的“配置”tibble中的行顺序可能与我的“目标”tibble中的列/变量顺序不对应。
所以我的“配置”tibble可能是这样的：
test_config <- dplyr::tibble(
string_col = c("col1"
浏览 68提问于2018-10-31得票数 1
回答已采纳
我用了反向链接函数，
ilink <- family(gam_model)$linkinv
用于创建时间序列交互图，它的工作原理非常棒。
为了考虑模型中的自相关性，我将我的模型替换为gamm模型。在gamm模型上可以使用逆链接函数吗？我试过了
ilink <- family(gamm_model)$linkinv
ilink <- family(gamm_model$gam)$linkinv
ilink <- family(gamm_model$lme)$linkinv
但是，对于所有的选项，它都显示了错误：
UseMethod中的错误(“家庭”)：没有适用于"
浏览 5提问于2020-01-15得票数 1
回答已采纳
4回答
设置
我的任务看起来类似于，但不完全一样。假设我有一个对称的数据框架，如下所示
df <- data.frame(
matrix(c(1, 7, 0, 5, 9, 0,
7, 4, 0, 8, 2, 0,
0, 0, 0, 0, 0, 0,
5, 8, 0, 1, 1, 0,
9, 2, 0, 1, 1, 0,
0, 0, 0, 0, 0, 0), nrow=6, ncol=6)
)
看上去像这样
X1 X2 X3 X4 X5 X6
1
浏览 3提问于2020-01-01得票数 2
回答已采纳
1回答
在循环中过滤火花tbl
、、、
我使用sparklyr和dplyr来读取比可用内存大得多的数据。所以，我没有把数据加载到内存中。
dat_tbl <- spark_read_parquet(sc, name = "dat", path = path, memory = FALSE)
当我试图以以下方式过滤(循环侧的数据，比如i = 1)时，失败了
var_name <- unique_values$Species[1]
res <- dat_tbl %>%
filter(Species == unique_values$Species[1])
res
浏览 0提问于2019-06-06得票数 2
1回答
我在R中运行了随机森林模型，现在我把它称为预测数据集
predict.rf<-predict(layers.stack,random.forest, na.rm=T, type='response')
然而，它带来了一个错误，如下：
UseMethod中的错误(“预测”)：没有适用于类c(‘随机森林公式’，‘randomForest’)‘预测’的方法。
有人知道如何纠正这个错误吗？
问候
浏览 1提问于2019-02-11得票数 1
今天我无法对modularity函数应用apply函数，后者位于'igraph‘包中。以下是代码和结果。
> library(igraph)
> g = graph.full(2)
> modularity(g, 1:2)
[1] -0.5
> apply(FUN = modularity, MARGIN = 1, X = matrix(1:4, ncol = 2), graph = g, weights = NULL)
Error in UseMethod("modularity") :
no applicable method for &#
浏览 0提问于2013-02-25得票数 3
1回答
我有一个数据框架，我想把所有的值相加到最近的0.05倍数。我发现来自plyr的round_any可以做到这一点，但是当我键入以下代码时：
> library(plyr)
> round_any(Table, 0.05)
我得到以下错误：
Error in UseMethod("round_any") :
no applicable method for 'round_any' applied to an object of class "data.frame"
你能帮我克服这件事吗？
浏览 0提问于2018-05-09得票数 1
回答已采纳
2回答
在管道中使用ggplot后可以执行summarise吗？这个变量并不是很重要，我只是出于探索的目的而观察这个变化。因此，我并不是真的想保存这个变量。
df %>%
mutate(change = t2 - t1) %>%
ggplot(aes(x = change)) +
geom_histogram() %>%
summarise(mean_change = mean(change))
Error in UseMethod("summarise_") : no applicable meth
浏览 0提问于2017-12-11得票数 1
我正在尝试使用R从一个网站上抓取数据，我是在抓取数据方面的新手。
我的代码如下：
library(XML)
url1<-"http://www.covers.com/sports/NCAAB/matchups?selectedDate=2015-02-28"
data1<-htmlTreeParse(url1)
getNodeSet(data1,"//div[@class = 'data-competition-type']")
然而，我犯了这样一个错误：
Error in UseMethod("xpathApply"
浏览 2提问于2016-03-05得票数 0
回答已采纳
1回答
我正在处理以下几条线：
library(quantmod)
library(tidyr)
start="2022-01-01"
end="2022-11-01"
getSymbols("0386.HK",from=start, to=end)
getSymbols("600028.SS",from=start,to=end)
CPC_H<-`0386.HK`[,6]
CPC_A<-`600028.SS`[,6]
df<-cbind(CPC_A,CPC_H)
在这两个变量中的dataframe中都有一些NAs，所
浏览 3提问于2022-11-04得票数 0
回答已采纳
这个项目背后的想法是在将数据库上传到webService时运行一个进度条
我有一个做一些工作的AsyncTask，然后调用一个服务并等待它完成，然后调用onPostExecute()
private class UploadDatabaseAsyncTask extends AsyncTask<Void, Long, Void> {
private AlertDialog dialog;
private Activity activity;
private TextView messageView;
private String location;
浏览 0提问于2019-05-22得票数 0
回答已采纳
我的数据涉及一家公司，包括CA、TX和WI三个县的总销售额和销售额。
数据：
> dput(head(WalData))
structure(list(CA = c(11047, 9925, 11322, 12251, 16610, 14696
), TX = c(7381, 5912, 9006, 6226, 9440, 9376), WI = c(6984, 3309,
8883, 9533, 11882, 8664), Total = c(25412, 19146, 29211, 28010,
37932, 32736), date = structure(c(12965184
浏览 6提问于2020-11-23得票数 0
2回答
我有一个相当大的tibble (名为df.tbl，有26k行和22列)，我希望找到每个对象的“双胞胎”，即在列2:7 (日期:Pos)中具有相同值的每一行。
如果我用：
inner_join(df.tbl, ~ df.tbl[i,], by = c("date", "forge", "serNum", "PinMain", "PinMainNumber", "Pos"))
由于i是我想要检查的“双胞胎”行，所以一切都像预期的那样正常工作，抛出了一个2×22的tibble，我可以使用以下方法进行扩展：
浏览 0提问于2018-11-29得票数 0
回答已采纳
lookup <- list(
'miles_per_gallon' = 'mpg',
'cylinder' = 'cyl'
)
df1 <- mtcars
df2 <- NULL
# function to rename columns based on the lookup above
index_name <- function(df, lookup) {
i1 <- unlist(lookup) %in% names(df)
names_lookup_sub <-
浏览 8提问于2020-12-09得票数 1
回答已采纳
如何计算后验样本的最大后验密度( HPD )间隔？我有四个参数，从后验参数分布产生1000个样本。现在如何在R软件中计算HPD。我使用了包代码，但是我发现了一个错误
HPDinterval(winbugsresult$sims.list,prob=0.05)
Error in UseMethod("HPDinterval") :
no applicable method for 'HPDinterval' applied to an object of class "list"
其中"winbugsresult“
浏览 2提问于2020-07-11得票数 1
回答已采纳
1回答
我正在尝试编写一个出色的应用程序，该应用程序根据用户的输入加载Rdata，对其进行过滤并绘制结果图。所有Rdata文件都位于一个文件夹中，并遵循相同的名称格式。下面是我为服务器编写的代码示例。
server <- function(input, output) {
data <- reactive({load(paste0("themewise_final_datasets/final_", input$Theme, "_theme.RData"))})
data_filtered <- reactive({data() %>%
浏览 0提问于2021-10-16得票数 0
我已经找了很长时间了，一直没有找到合适的答案。我有一个变量"extern“，它是一个包含数据框架名称的向量：
extern <- list.files(pattern = "*.csv")
extern <– c("altitude.csv", "area.csv", "farmland.csv", "GDPpercapita.csv", "population.csv")
我可以像这样把它们加载到R中，字符被转换成变量。假设wd是与数据相同的文件夹，它对我有效。
for (i
浏览 1提问于2021-03-01得票数 0
回答已采纳
如何拆分a列(按空格字符)并计算列a中的任何子字符串在b列中存在多少次？
library(data.table)
library(stringr)
dt = data.table(
a = c('one', 'one two', 'one two three'),
b = c('zero', 'none_or One?' , 'onetwothree')
)
我尝试的时候失败了：
dt[ , .(
str_count( b,
pattern = str_sp
浏览 10提问于2022-03-10得票数 1
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
即时通信 IM
实时音视频活动推荐
腾讯云开发者
