我正在用ggplot绘制一些数据.但是,我不理解我所获得的错误与数据略有不同,而不是我能成功绘制的数据.例如,此数据图表成功:
to_graph <- structure(list(Teacher = c("BS", "BS", "FA"
), Level = structure(c(2L, 1L, 1L), .Label = c("BE", "AE", "ME",
"EE"), class = "factor"), Count = c(2L, 25L, 28L)), .Names = c("Teacher",
"Level", "Count"), row.names = c(NA, 3L), class = "data.frame")
ggplot(data=to_graph, aes(x=Teacher, y=Count, fill=Level), ordered=TRUE) +
geom_bar(aes(fill = Level), position = 'fill') +
scale_y_continuous("",formatter="percent") +
scale_fill_manual(values = c("#FF0000", "#FFFF00","#00CC00", "#0000FF")) +
opts(axis.text.x=theme_text(angle=45)) +
opts(title = "Score Distribution")
Run Code Online (Sandbox Code Playgroud)
但这不是:
to_graph <- structure(list(School = c(84351L, 84384L, 84385L, 84386L, 84387L,
84388L, 84389L, 84397L, …Run Code Online (Sandbox Code Playgroud) 我想合并:
to_graph <- structure(list(Teacher = c("BS", "BS", "FA"
), Level = structure(c(2L, 1L, 1L), .Label = c("BE", "AE", "ME",
"EE"), class = "factor"), Count = c(2L, 25L, 28L)), .Names = c("Teacher",
"Level", "Count"), row.names = c(NA, 3L), class = "data.frame")
Run Code Online (Sandbox Code Playgroud)
和
graph_avg <- structure(list(Teacher = structure(c(1L, 1L, 2L), .Label = c("BS",
"FA"), class = "factor"), Count.Fraction = c(0.0740740740740741,
0.925925925925926, 1)), .Names = c("Teacher", "Count.Fraction"
), row.names = c(NA, -3L), class = "data.frame")
Run Code Online (Sandbox Code Playgroud)
用merge(to_graph, graph_avg, by="Teacher"),但不是得到我期望的(3行),我得到:
Teacher Level Count …Run Code Online (Sandbox Code Playgroud) 我很困惑为什么键的符号版本在以下示例中不起作用.如上所示,我使用的是Ruby 1.9.3.这是一个更大的应用程序的一部分,但已经能够缩小到这个问题.
先感谢您!
1.9.3-p194 :002 > json_sample = "{\"this\":\"notworking\"}"
=> "{\"this\":\"notworking\"}"
1.9.3-p194 :003 > test_hash = JSON.parse json_sample
=> {"this"=>"notworking"}
1.9.3-p194 :004 > test_hash["this"]
=> "notworking"
1.9.3-p194 :005 > test_hash[:this]
=> nil
可能重复:
ggplot2:在图表上添加回归线方程和R2
我用散点图绘制数据
ggplot(work.rootsfnp.h1, aes(x=fnpltrfac, y=rootsscore, group=1)) +
geom_smooth(method=lm, se = F) + geom_point(shape=1)
Run Code Online (Sandbox Code Playgroud)
是否有一种"快速"方式来添加基本图例,其中包括最佳拟合线的公式以及相关系数?
我正在开发一个主要是Ruby on Rails的项目.但是,我需要在这个项目中生成和解析Excel文件(我知道,我知道......),所以我一直在使用Perl的Spreadsheet :: WriteExcel和Spreadsheet :: ParseExcel.但是,将这种Perl与更大的Ruby on Rails应用程序结合使用的最佳方法是什么?用反引号调用Perl脚本是另一种解决方法吗?对我来说这感觉有点哈哈,但如果这是唯一的(或最好的)方式,那就是我要做的.我想伸出手,看看是否有其他人有一些建议或建议.
谢谢!
我是R的新手,在使用ifelse()函数时会得到意想不到的结果.这是一个例子.下面是我正在使用的数据框的子集.在最后一个命令之后,为什么示例$ Points列包含12而不是2?我已经尝试了这个示例$ Value的许多不同值,结果总是比我预期的多10.
例:
example
Question StudentID SchoolID Value Worth Answer Points
2926 18 101290 84386 2 2 Co 0
2927 18 100878 84386 2 2 Co 0
2928 18 100895 84386 1 5 Co 0
2929 18 100913 84386 2 2 Co 0
2930 18 100884 84386 2 2 Co 0
example$Points <- ifelse(example$Answer == "Co", example$Value, example$Points)
example
Question StudentID SchoolID Value Worth Answer Points
2926 18 101290 84386 2 2 Co 12
2927 18 100878 84386 2 …Run Code Online (Sandbox Code Playgroud) 我正在编写一个需要通过PHP邮件功能发送电子邮件的脚本.如下所示,它在向gmail帐户发送电子邮件时起作用,但在我的域中不是帐户.我们正在运行Exchange服务器.截至目前,电子邮件是从_www @ server发送的.有没有人知道php邮件和Exchange的问题(或者甚至是以下划线和Exchange开头的电子邮件地址?)?或许这里还有另一个问题?无论如何,邮件功能都将返回true.
谢谢,
杰夫
$user = $_POST['email'];
$to = "someone@domain.org";
$subject = "Request to Reset EduTube Password";
$body = "Thank you " . $_POST['email'] . " for using the EduTube Password Reset System.\n\n";
$body .= "Please click the following link, or copy & paste it into your browser to reset your password.\n\n";
$body .= "http://testing.domain.org/reset.php?user=" . $user;
$headers = "From: someone@domain.org";
$from = "EduTube Password Reset System";
if (mail($to, $subject, $body, $headers)){
echo "Your email has been sent. Please …Run Code Online (Sandbox Code Playgroud) 我有一个数据框,我想根据schoolid变量的唯一值进行子集化.然后将这些评分记录到列表中,因此列表的每个成员都是数据框的子集.我显然知道如何针对具体的schoolid值,一次一个地做这个,但是如何在不知道schoolid可能出现哪些值的情况下系统地做到这一点?
谢谢您的帮助!杰夫
structure(list(schoolid = c(84351L, 84351L, 84351L, 84351L, 84351L,
84351L, 84351L, 84351L, 84351L, 84351L, 84351L, 84351L, 84351L,
84351L, 84351L, 84384L, 84384L, 84384L, 84384L, 84384L, 84384L,
84384L, 84384L, 84384L, 84384L, 84384L, 84384L, 84384L, 84384L,
84384L, 84385L, 84385L, 84385L, 84385L, 84385L, 84385L, 84385L,
84385L, 84385L, 84385L, 84385L, 84385L, 84385L, 84385L, 84385L,
84386L, 84386L, 84386L, 84386L, 84386L, 84386L, 84386L, 84386L,
84386L, 84386L, 84386L, 84386L, 84386L, 84386L, 84386L, 84387L,
84387L, 84387L, 84387L, 84387L, 84387L, 84387L, 84387L, 84387L,
84388L, 84388L, 84388L, 84388L, 84388L, 84388L, 84388L, …Run Code Online (Sandbox Code Playgroud) 我正在尝试从 bash 脚本运行命令。命令本身有单引号,但我无法让它们工作,因为单引号内有需要扩展的变量。这是 bash 脚本:
#!/bin/bash
if [ "$2" == "PracSci" ];
then
echo "Running tabulate.science.r"
R CMD BATCH --no-save --no-restore --slave '--args $1 $2 $3' tabulate.science.r /dev/tty
else
echo "Running tabulate.r"
R CMD BATCH --no-save --no-restore --slave '--args $1 $2 $3' tabulate.r /dev/tty
fi
Run Code Online (Sandbox Code Playgroud)
./script.sh 2 Vocab May12例如,当运行时,命令本身在没有变量值的情况下运行。
如何在仍然运行命令的同时扩展变量?
为了清楚起见,我尝试运行的命令是:(
R CMD BATCH --no-save --no-restore --slave '--args $1 $2 $3' tabulate.r /dev/tty包括命令中的单引号)。
谢谢!
我正在阅读Mark Pilgrim's Dive in Python 3并且现在已经盯着这个大约一个小时了:http://getpython3.com/diveintopython3/strings.html#common-string-methods
>>> s = '''Finished files are the re-
... sult of years of scientif-
... ic study combined with the
... experience of years.'''
>>> s.lower().count('f')
6
Run Code Online (Sandbox Code Playgroud)
在给出的多行字符串示例中,我不明白为什么s.lower().count('f')返回6而不是3.我已经确认它确实返回6.当然,Pilgrim甚至在他的笔记中指出它实际上是6,但是没有解释原因.
有人可以帮我吗?谢谢!