经过一番研究后,我找到了防止显示无信息传奇的方法
... + theme(legend.position = "none")
Run Code Online (Sandbox Code Playgroud)
我在哪里可以找到theme
ggplot2的所有可用选项及其默认值?
试图计算R中矩阵的幂,我发现包expm
实现了运算符%^%.
所以x%^%k计算矩阵的k次方.
> A<-matrix(c(1,3,0,2,8,4,1,1,1),nrow=3)
> A %^% 5
[,1] [,2] [,3]
[1,] 6469 18038 2929
[2,] 21837 60902 9889
[3,] 10440 29116 4729
Run Code Online (Sandbox Code Playgroud)
但令我惊讶的是:
> A
[,1] [,2] [,3]
[1,] 691 1926 312
[2,] 2331 6502 1056
[3,] 1116 3108 505
Run Code Online (Sandbox Code Playgroud)
不知何故,初始矩阵A已变为A%^%4 !!!
你如何执行矩阵功率操作?
是否有一种方法 - 除了for循环 - 在R数据帧中生成新变量,这将是现有的所有可能的双向交互?即假设一个具有三个数值变量V1,V2,V3的数据帧,我想生成以下新变量:
Inter.V1V2 (= V1 * V2)
Inter.V1V3 (= V1 * V3)
Inter.V2V3 (= V2 * V3)
Run Code Online (Sandbox Code Playgroud)
使用for循环的示例:
x <- read.table(textConnection('
V1 V2 V3 V4
1 9 25 18
2 5 20 10
3 4 30 12
4 4 34 16'
), header=TRUE)
dim.init <- dim(x)[2]
for (i in 1: (dim.init - 1) ) {
for (j in (i + 1) : (dim.init) ) {
x[dim(x)[2] + 1] <- x[i] * x[j]
names(x)[dim(x)[2]] <- paste("Inter.V",i,"V",j,sep="")
}
}
Run Code Online (Sandbox Code Playgroud) 按照此相关问题中提供的说明,我能够发送html格式的邮件消息.现在的问题是:我应该如何修改以下代码,以便将一个或多个文件(任何类型)附加到此消息中?
library(sendmailR)
from <- "<sendmailR@myserver.mycompany.com>"
to <- c("<someone@mycompany.com>","<anotherone@mycompany.com>")
subject <- iconv("Message Title", to = "utf8")
msg <- "<hr size='2' width='33%' style='text-align: left;'><font size='2'>
<i>This email was sent automatically using <a href='http://finzi.psych.upenn.edu/R/library/sendmailR/html/00Index.html' rel='nofollow' target='_blank'>sendmailR</a>.<br>
Please do not reply directly to this e-mail.</i></font>"
msg <- iconv(msg, to = "utf8")
sapply(to,function(x) sendmail(from, x, subject, msg, control=list(smtpServer="###.###.###.###"), headers=list("Content-Type"="text/html; charset=UTF-8; format=flowed")))
Run Code Online (Sandbox Code Playgroud) A B C
1 ? ?
2 ? ?
3 ? ?
4 ? ?
5 ? ?
6 ? ?
7 ? B
8 ? ?
9 ? ?
10 ? ?
11 ? A
12 ? ?
13 ? ?
14 ? ?
15 ? ?
16 ? ??
Run Code Online (Sandbox Code Playgroud)
在单元格B16中,我想计算单元格C1:C15 和 A16中有多少"B"(A16中的值).然后使用一些函数我将在单元格C16中放置"A"或"B".我如何在COUNTIF中提供这样的范围?必须对B列中的每个单元使用相同的公式.
有许多聚类算法可供使用.一种流行的算法是K-means,其中,基于给定数量的聚类,算法迭代以找到对象的最佳聚类.
您使用什么方法来确定k-means聚类中数据中的聚类数?
R中可用的任何包是否包含V-fold cross-validation
确定正确簇数的方法?
另一种使用良好的方法是期望最大化(EM)算法,该算法为每个实例分配概率分布,该概率分布指示其属于每个聚类的概率.
这个算法是用R实现的吗?
如果是,是否可以通过交叉验证自动选择最佳簇数?
您更喜欢其他一些聚类方法吗?
我想显示在一个闪亮的面板-乳胶formated-公式,但我不能找到一种方法结合textOutput
使用withMathJax
.我试过以下但是没有用.任何帮助将不胜感激.
--ui.r
...
tabPanel("Diagnostics", h4(textOutput("diagTitle")),
withMathJax(textOutput("formula")),
),
...
Run Code Online (Sandbox Code Playgroud)
--server.r
...
output$formula <- renderText({
print(paste0("Use this formula: $$\\hat{A}_{\\small{\\textrm{M€}}} =", my_calculated_value,"$$"))
})
...
Run Code Online (Sandbox Code Playgroud)