我最近遇到了一种使用数据表对象的compute方法在C#中计算表达式的方法.这是一段代码:
string expression = "330200000*450000";
var loDataTable = new DataTable();
var loDataColumn = new DataColumn("Eval", typeof(double), expression);
loDataTable.Columns.Add(loDataColumn);
loDataTable.Rows.Add(0);
MessageBox.Show(((double)(loDataTable.Rows[0]["Eval"])).ToString());
Run Code Online (Sandbox Code Playgroud)
如果你把一个简单的表达式,如"300*2",这将工作,但是返回一个大数字的表达式将无法工作,我收到消息:
"Type'Int32'的值太大或太小."
我试图强制类型加倍,但由于某种原因,错误仍然指向Int32类型的东西,我不知道它来自何处.
那个小手?
我正在努力解决ggplot中scale_shape_manual和scale_colour_manual的问题.从ggplot help(scale_colour_manual)中重新获取示例,我们得到以下两行:
p <- qplot(mpg, wt, data = mtcars, colour = factor(cyl))
p + scale_colour_manual(values = c("red","blue", "green"))
Run Code Online (Sandbox Code Playgroud)
他们工作正常,我可以做任何我想做的事情.但是,如果我决定创建一个像这样的线,这将创建一个组合层的对象
h <- p + scale_colour_manual(values = c("red","blue", "green"))
Run Code Online (Sandbox Code Playgroud)
然后任何命令都会提示我一条警告信息"将class(x)设置为多个字符串("manual","discrete",...);结果将不再是S4对象".即使是非常简单的一个:
a = 2
Run Code Online (Sandbox Code Playgroud)
但是,如果我重新编译它的最后一行它.有人有同样的问题吗?你能帮帮我吗?
以下评论是一个可重复的例子
library(ggplot2)
library(Hmisc)
data(mpg)
p <- qplot(mpg, wt, data = mtcars, colour = factor(cyl))
h <- p + scale_colour_manual(values = c("red","blue", "green"))
a = 2
Run Code Online (Sandbox Code Playgroud)
更新 - 显然它只是一个版本问题,以下版本似乎不能一起工作:R版本3.0.3(2014-03-06)Hmisc_3.14-3和ggplot2_0.9.3.1.有人可能会考虑分离(包:Hmisc,unload = TRUE)或只是接受警告.
谢谢R
我正在寻找一种在积极约束下进行线性回归的方法,因此遇到了nnls方法.但是我想知道如何从nnls获得与lm对象提供的统计信息相同的统计信息.更具体地说,R平方,akaike标准,p值.
library(arm)
library(nnls)
data = runif(100*4, min = -1, max = 1)
data = matrix(data, ncol = 4)
colnames(data) = c("y", "x1", "x2", "x3")
data = as.data.frame(data)
data$x1 = -data$y
A = as.matrix(data[,c("x1", "x2", "x3")])
b = data$y
test = nnls(A,b)
print(test)
Run Code Online (Sandbox Code Playgroud)
有没有办法在lm框架中重新估计,使用偏移和修复系数不起作用...有没有办法获得这些统计数据?或者在系数的正约束下创建lm对象的另一种方法?
谢谢罗曼.
我在团队中工作,我们主要使用 R,我非常习惯在 Rstudio 中使用 R 项目,我喜欢它,因为当我打开它们时,我的所有脚本和所有内容都在正确的位置。但是,当团队的另一名成员打开我的一个项目时,它会加载值和数据,但不会打开 R 脚本(可以通过 Windows 资源管理器物理单击项目而不是使用右上角的菜单来查看这一点) R)。我想可以在 .Rprofile 中完成一些操作,但我没有找到任何物理打开脚本的命令,我试过了
file.edit("./Main.R")
Run Code Online (Sandbox Code Playgroud)
但它没有打开任何东西。它刚刚给我的消息:
错误:找不到函数“file.edit”
一如既往,感谢您的帮助!
**编辑我尝试使用
file.show
file.edit
shell.exec(file.path(getwd()), "Main.R"))
Run Code Online (Sandbox Code Playgroud)
在 .Rprofile 中。没有任何效果。
罗曼