我有这个错误：
“someFunction”不是从“namespace:somePackage”导出的对象
有谁知道如何解决它？
我有一个以下数据框架
a = data.frame(a=c(1,2,3,4,5,6,7),b=c(1,2,3,10,12,21,4),c=c(1,2,10,11,"X","Y",3))
> a
a b c
1 1 1 1
2 2 2 2
3 3 3 10
4 4 10 11
5 5 12 X
6 6 21 Y
7 7 4 3
我想按字典顺序对整个数据框进行排序,以便输出(例如,列"c")应该是这样的
> a[,"c"]
[1] 1 2 3 10 11 X Y
我试过了,我正在寻找不同的答案
indata <- a[do.call(order,a[,c("c","a","b")]),]
> indata[,"c"]
[1] 1 10 11 2 3 X Y
Levels: 1 10 11 2 3 X Y
我尝试了gtools,mixedorder包并在一列上工作正常:
> a[mixedorder(a$c),]
a b c
1 1 1 1 …我有一个纬度和经度值列表,我试图找到它们之间的距离.使用标准的大圆方法,我需要找到:
acos(sin(lat1)*sin(lat2) + cos(lat1)*cos(lat2) * cos(long2-long1))
并将其乘以我正在使用的单位的地球半径.只要我们取acos的值在[-1,1]范围内,这就有效.如果它们甚至略微超出此范围,它将返回NaN,即使差异是由于四舍五入.
我遇到的问题是,有时,当两个纬度/长度值相同时,这会给我一个NaN错误.并非总是如此,即使对于同一对数字,但在列表中总是相同的数字.例如,我有一个人停在沙漠中的一条路上:
Time |lat |long
1:00PM|35.08646|-117.5023
1:01PM|35.08646|-117.5023
1:02PM|35.08646|-117.5023
1:03PM|35.08646|-117.5023
1:04PM|35.08646|-117.5023
当我计算连续点之间的距离时,例如,第三个值将始终为NaN,即使其他点不是.这似乎是R舍入的一个奇怪的错误.
我收到了错误
Error in if (condition) { : argument is not interpretable as logical
要么
Error in while (condition) { : argument is not interpretable as logical
它是什么意思,我该如何预防呢？
我有一个R数据帧,我试图从另一列中减去一列.我使用$运算符提取列,但列的类是'因子',R不会对因子执行算术运算.有这些特殊功能吗？
我正在使用以下脚本分析大量数据:
M <- c_alignment
c_check <- function(x){
if (x == c_1) {
1
}else{
0
}
}
both_c_check <- function(x){
if (x[res_1] == c_1 && x[res_2] == c_1) {
1
}else{
0
}
}
variance_function <- function(x,y){
sqrt(x*(1-x))*sqrt(y*(1-y))
}
frames_total <- nrow(M)
cols <- ncol(M)
c_vector <- apply(M, 2, max)
freq_vector <- matrix(nrow = sum(c_vector))
co_freq_matrix <- matrix(nrow = sum(c_vector), ncol = sum(c_vector))
insertion <- 0
res_1_insertion <- 0
for (res_1 in 1:cols){
for (c_1 in 1:conf_vector[res_1]){
res_1_insertion <- res_1_insertion …客户端向我发送了一个Excel文件,其日期格式为3月15日的3/15/2012.我将其保存为.csv文件然后使用
camm$Date <- as.Date(camm$Date, "%m/%d/%y")
但这给了我从2020年开始的价值!
我试图重新格式化原始csv文件中的日期,以便它们是例如03/14/2013但是无法这样做.
任何帮助赞赏
> x <- 1.00042589212565
> x
[1] 1.000426
如果我想打印确切的值x,我该怎么做？
对不起,如果这是一个愚蠢的问题.我试着谷歌搜索"R"和"确切"或"圆形",但我得到的是关于如何舍入的文章.
先感谢您!
我正在从txt文件中读取文本并将内容传递给SQL.SQL文本包含双引号并导致问题.我想删除下面字符串中的"\",以便将其发送到SQL
test<- "select case when \"est\" dsaf"
test<- cat(test, sep="")
class(test)
返回一个UNQUOTED null对象
> test<- "select case when \"est\" dsaf"
> test<- cat(test, sep="")
select case when "est" dsaf
> class(test)
[1] "NULL"
当我将未加引号的字符串传递给SQL时,我收到此错误:
Error in odbcQuery(channel, query, rows_at_time) :
'getCharCE' must be called on a CHARSXP
我希望它返回引导和尾随引号,然后我可以将它发送到SQl,它将工作.
[1] "select case when "est" dsaf"
我想对我的数据框进行子集化,以便仅保留在不同日期有3个或更多观察值的组.我想摆脱少于3次观察的群体,或者他们所拥有的观察不是来自3个不同的日子.
这是一个示例数据集:
Group Day
1 1
1 3
1 5
1 5
2 2
2 2
2 4
2 4
3 1
3 2
3 3
4 1
4 5
因此,对于上面的示例,将保留组1和组3,并且将从数据帧中移除组2和组4.
我希望这是有道理的,我想解决方案将非常简单,但我无法解决它(我对R很新,并且不会很快就提出这样的解决方案).我想也许diff功能可以派上用场,但是没有进一步发展,我没有任何运气在SO和其他网站上搜索现有问题以获得答案.
非常感谢你提前!
我正在尝试使用system2和运行命令并使用env参数设置环境变量,但似乎没有设置.我在Linux上,所以这应该工作[在它提到的帮助文件中,env有时在Windows中不起作用].
有谁知道如何设置环境变量system32？
例如
system2('echo', args='foobar')
# foobar # as expected
system2('echo', args='$X', env="X=foobar")
# # <-- nothing is printed. as if I had just done `echo`
# I expect to see 'foobar' echoed.
# pretty sure the above environment specification is right, but just in case
system2('echo', args='$X', env=c(X='foobar'))
# sh: 1: foobar: not found
# just to show it can work
system('X=foobar; echo $X')
# foobar
我system现在只是用作解决方法,但system帮助文件继续讨论我应该如何使用 …
=和之间有什么区别==？我找到了双等号将允许我的脚本运行而一个等号产生错误消息的情况.我何时应该使用==而不是=？
我已阅读如何使一个伟大的[R重复的例子，著名的线程，但有没有具体的建议如何提出一个伟大的ggplot，lattice或基本情节重大R第。
您建立出色范例的秘诀是什么？您应该包括或避免使用哪些信息？
您如何陈述预期的输出？建议的附件大小和格式是什么？