小编Ben*_*Ben的帖子

我有固定宽度的数据文件(.dbf),没有行分隔符.以下是该数据文件的两行:

20141101 77h  3.210                                  0    3 20141102 76h  3.090                                  0    3 

一行的宽度c(8,4,7,41)用于日期(8),一些时间度量(4),数据点(7)以及我可以在一个"休息"列(41)中汇总的一些其他列.在一行之后没有分隔符,下一行只是附加到第一行.所有时间步骤基本上都是连续写入一条大线.此文件中只包含数字,字符和空格.

与read.fwf('filepath', widths = c(8,4,7,41))第一行之后的R停止读取,由于缺乏在线分离器的.

read.fwf()当没有行分隔符时,是否有一个参数告诉您何时开始读取新行？或者我应该使用不同的读命令？

提前致谢.

我制作了一系列直方图，并且facet_grid希望网格中的每个直方图都具有相同数量的类，在下面的示例中，例如 6 个类。下面这个例子中的问题是binwidth = diff(range(x$data))/6)根据a、b和c的整体范围来定义类，即为所有三个方面定义一个binwidth。

如何分别定义面 a、b 和 c 的 binwidth？

require("ggplot2")

a <- c(1.21,1.57,1.21,0.29,0.36,0.29,0.93,0.26,0.28,0.48,
       0.12,0.38,0.83,0.82,0.41,0.69,0.25,0.98,0.52,0.11)
b <- c(0.42,0.65,0.17,0.38,0.44,0.01,0.01,0.03,0.15,0.01)
c <- c(1.09,3.55,1.07,4.55,0.55,0.11,0.72,0.66,1.22,3.04,
       2.01,0.64,0.47,1.33,3.44)

x <- data.frame(data = c(a,b,c), variable = c(rep("a",20),rep("b",10),rep("c",15)),area="random")

qplot(data, data = x, geom = "histogram", binwidth = diff(range(x$data))/6) +
  facet_grid(area~variable, scales = "free")

在水文学中，Nash\xe2\x80\x93Sutcliffe 效率 (NSE) 系数用于确定模型效率。与决定系数（更广为人知的名称为 R^2）类似，根据经验，所有高于 0.7 左右的值都被认为是合适的（或更好），NSE 的值被认为是可接受的当您对放电时间序列进行建模时？

为了抑制数字的指数表示法,在我的全球环境中我有options("scipen" = 100).要做一些我需要指数表示法的东西,我想暂时改变一个函数内部的这个选项,比如

f <- function(x){
                 options("scipen" = -100)
                 ...
}

但是,更改函数内的选项也会自动更改全局环境中的选项.有没有办法在函数内局部更改选项？