小编pla*_*pus的帖子

System.Numerics.BigInteger允许你将大整数相乘,但浮点数是否有相同类型的东西？如果没有,我可以使用免费图书馆吗？

//this but with floats
System.Numerics.BigInteger maxint = new BigInteger(int.MaxValue);

System.Numerics.BigInteger big = maxint * maxint * maxint;
System.Console.WriteLine(big);

我希望在我的bquote环境中有一个新的界限,我该怎么做？

我的代码:

test<-c(1,2,3,4,4.5,3.5,5.6)
test2<-0.033111111
plot(test,c(1:length(test)))

segments(4,0,4,23,col="red",lwd=2)
text(5, 4.5, labels = bquote(Qua[0.99] == .(round(test2,4))),col="red", cex = 1.4)

我希望在等号后面有一个新行,所以这应该给:

VaR_0.99 =

0.03311

and not

    VaR_0.99 = 0.03311

我尝试用线条,但它不起作用:

    test<-c(1,2,3,4,4.5,3.5,5.6)
    test2<-0.033111111
    lines<-list(bquote(Qua[0.99] == ),bquote(.(round(test2,4))))
    plot(test,c(1:length(test)))

    segments(4,0,4,23,col="red",lwd=2)
    text(5, 4.5, labels =lines ,col="red", cex = 1.4)

我有一系列x和y坐标,每个坐标都附有距离.我想创建一个热图,显示x和y范围内每个点的平均距离作为热图.由于这些点不是以格子状的形状彼此均匀地间隔开,因此该方法需要某种平滑功能,该功能将数据聚类并计算附近的每个点的平均值,然后用颜色表示该平均值.

到目前为止,使用ggplot2,我只能找到类似stat_density2d和的方法geom_tile,它们只能用于显示点密度和表示均匀间隔的点(据我所知).

理想情况下,它将遵循与此图像相同的原则:

即使点的密度和位置不均匀,也基于附近的给定点分配颜色.

我不想像这个图像那样以矩阵形式创建热图:

表格是用颜色编码的.相反,我想使用非均匀分布的x和y坐标创建连续热图,实际上,它显示数据被分成无限多个矩形的极限.这可能不是该函数使用的实际方法,但它提供了我正在寻找的一般概念.

以下是一些示例数据:

data=data.frame(x=c(1,1,2,2,3,4,5,6,7,7,8,9),
  y=c(2,4,5,1,3,8,4,8,1,1,6,9),
  distance=c(66,84,93,76,104,29,70,19,60,50,46,36))

如何制作带距离的热图作为覆盖整个数字范围的色标,如第一个链接中提供的图？

任何帮助是极大的赞赏!

我已经看到这里发布的这个错误,但我没有得到任何修复工作.我目前正在使用内置的"忠实"数据集作为r-tutor.com教程的一部分:

duration = faithful$eruptions
waiting = faithful$waiting
abline(lm(duration ~ waiting))
Error in int_abline(a = a, b = b, h = h, v = v, untf = untf, ...) : 
  plot.new has not been called yet

我试过plot.new(),没有运气.我试过了

x <- (duration ~ waiting)
abline(x)

没运气.

我试过重新启动R,没有运气.使用3.0.0 for Windows.谢谢.

我希望有两行的情节标题,但这不起作用,为什么？我怎样才能让它发挥作用？

CVal<-1 
SumEpsVal<-2 
plot(1:10, main=bquote(paste("C=", .(CVal), " \n ", sum(xi), "=", .(SumEpsVal) )))

这在这里工作:

plot(1:10, main=paste("C=1", "\n", "SumXi=2"))

我猜bquote出错了...(查询？bquote)我试图改变bqoute(where-argument)中的环境,但我不知道要采取哪种环境.

BTW:

plot(1:10, main=bquote(paste("C=", .(CVal), "bla \n ", sum(xi), "=", .(SumEpsVal) )))

用"bla"让事情变得疯狂.

我为多个数据集生成了一个图.每个数据集都应该得到它自己的图例,它可能包含希腊字母,plotmath符号或sub和superscrition.我想在循环中生成图例文本.

如果只有一个图例文字,Bquote工作正常.如果我尝试添加附加的传奇文本,那么plotmath-commads会丢失,...

x <- 0:10
y1 = x * x
y2 = x * 10

plot (1,1, type="n", xlab=bquote(Omega), ylab="Y", las=1, xlim=range(x), ylim=range(y1, y2))
lines(x, y1, col=1, pch=1, type="b")
lines(x, y2, col=2, pch=2, type="b")

# generate legend texts (in a loop)
legend_texts = c(
  bquote(Omega^2)
  , bquote(Omega%*%10)
)
# Using a single bquote works fine:
#legend_texts = bquote(Omega^2)
#legend_texts = bquote(Omega%*%10)

legend(
  "topleft"
  , legend = legend_texts
  , col = c(1:2)
  , pch = c(1:2)
  , lty = 1
  )

我有一个rasterstack(5个栅格图层)实际上是一个时间序列栅格.

r <- raster(nrow=20, ncol=200)
s <- stack( sapply(1:5, function(i) setValues(r, rnorm(ncell(r), i, 3) )) )
s

class       : RasterStack
dimensions  : 20, 200, 4000, 5  (nrow, ncol, ncell, nlayers)
resolution  : 1.8, 9  (x, y)
extent      : -180, 180, -90, 90  (xmin, xmax, ymin, ymax)
coord. ref. : +proj=longlat +datum=WGS84 +ellps=WGS84 +towgs84=0,0,0 
names       :   layer.1,   layer.2,   layer.3,   layer.4,   layer.5
min values  : -9.012146, -9.165947, -9.707269, -7.829763, -5.332007
max values  :  11.32811,  11.97328,  15.99459,  15.66769,  16.72236

我的目标是绘制每个像素并探索它们随时间的行为.

如何将每个像素与x,y坐标一起提取并绘制时间序列曲线？

在国家层面绘制地图有很多解决方案,但就我而言,我想在大陆层面打印统计数据.

我想到的唯一事情是使用国家级地图并使用每个大洲的国家列表,但我想知道这种地图是否有任何简单的解决方案.为了实现我的想法,它将是这样的:

## produce the world map
map()
## list of countries per continent
SA <- c("argentina", "bolivia", "brazil", "chile", "colombia", "ecuador", "guyana", "paraguay", "peru", "suriname", "uruguay", "venezuela")
map(regions = SA, fill=TRUE, add=TRUE)

使用以下代码,xlab将是粗体但是ylab不是.请你帮助我好吗

pdf()
par(font.axis=2, font.lab=2, cex.lab=1.2, cex.axis=1.2, cex.sub=1.2,
    mfrow=c(2,2), mar = c(5,6,3,1) + 0.1)
hist(ADAM, axes=F, main="", ylim=c(0,1000000), xlab="",
     ylab= expression(paste("number(",x10^6,")",sep="")))
axis(1,at=seq(0,1,0.2), labels=seq(0,1,0.2))
axis(2, at=seq(0,1000000,500000), labels=seq(0,1, by=0.5), las=2)
dev.off()

谢谢

我是一名mac用户,想要将R语言环境改为英语.

我知道defaults write应该在osx上设置R的语言环境.但是,奇怪的是,命令不起作用.

defaults write org.R-project.R force.LANG en_US.UTF-8

当我通过执行R.app启动R时,正确显示英文消息,但Terminal.app显示日语消息:

我的环境如下:

• Mac OS 10.8.5
• R版本3.0.1(2013-05-16) - "好运动"平台:x86_64-apple-darwin10.8.0(64位)

sessionInfo()终端的结果:

> sessionInfo()
R version 3.0.1 (2013-05-16)
Platform: x86_64-apple-darwin10.8.0 (64-bit)

locale:
[1] ja_JP.UTF-8/ja_JP.UTF-8/ja_JP.UTF-8/C/ja_JP.UTF-8/ja_JP.UTF-8

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base

在R.app上:

R version 3.0.1 (2013-05-16)
Platform: x86_64-apple-darwin10.8.0 (64-bit)

locale:
[1] en_US.UTF-8/en_US.UTF-8/en_US.UTF-8/C/en_US.UTF-8/en_US.UTF-8

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base    

loaded via a namespace (and not attached):
[1] caret_5.17-7    grid_3.0.1      kernlab_0.9-18  lattice_0.20-15