小编zx8*_*754的帖子

有两个文件夹约.150个java属性文件.

在shell脚本中,如何比较两个文件夹以查看其中任何一个文件夹中是否存在任何新属性文件以及属性文件之间的差异.

输出应采用报告格式.

我很惊讶地发现R没有附带一个方便的函数来检查数字是否为整数.

is.integer(66) # FALSE

在帮助文件警告:

is.integer(x)不测试是否x 包含整数!为此,请使用round,如is.wholenumber(x)示例中的函数 .

该示例将此自定义函数作为"解决方法"

is.wholenumber <- function(x, tol = .Machine$double.eps^0.5)  abs(x - round(x)) < tol
is.wholenumber(1) # is TRUE

如果我必须编写一个函数来检查整数,假设我没有阅读上面的注释,我会编写一个函数,它会像

check.integer <- function(x) {
    x == round(x)
}

我的方法会在哪里失败？如果你穿着我的假想鞋,你的工作会是什么？

我想通过使用ggplot2重现下面的情节.我可以靠近,但不能删除顶部和右边界.下面我介绍几次使用ggplot2的尝试,包括在Stackoverflow上或通过Stackoverflow找到的一些建议.不幸的是,我无法将这些建议付诸实践.

我希望有人能够纠正下面的一个或多个代码片段.

谢谢你的任何建议.

# desired plot
a <- seq(1,20)
b <- a^0.25
plot(a,b, bty = "l")


library(ggplot2)

df <- as.data.frame(cbind(a,b))

# 1. ggplot2 default
ggplot(df, aes(x = a, y = b)) + geom_point()

# 2. removes background color
ggplot(df, aes(x = a, y = b)) + geom_point() + opts(panel.background = theme_rect(fill='white', colour='black'))

# 3. also removes gridlines
none <- theme_blank()
ggplot(df, aes(x = a, y = b)) + geom_point() + opts(panel.background = theme_rect(fill='white', colour='black')) + opts(panel.grid.major = none, panel.grid.minor = …

如何在R中永久设置特定的CRAN镜像？

我想在我的笔记本电脑中永久设置它,这样当我这样做时install.packages(),它不会再问我哪个镜子可供选择.

我有两张桌子(表A和表B).

它们具有不同的列数 - 例如,表A具有更多列.

如何将这两个表联合起来并为表B没有的列获取null？

我使用R来解析表单中的字符串列表:

original_string <- "variable_name=variable_value"

首先,我从原始字符串中提取变量名称和值,并将值转换为数字类.

parameter_value <- as.numeric("variable_value")
parameter_name <- "variable_name"

然后,我想将值赋给一个与parameter_name字符串同名的变量.

variable_name <- parameter_value

这样做的功能是什么？

例如,如果我有这个:

n = c(2, 3, 5) 
s = c("aa", "bb", "cc") 
b = c(TRUE, FALSE, TRUE) 
df = data.frame(n, s, b)

  n  s     b
1 2 aa  TRUE
2 3 bb FALSE
3 5 cc  TRUE

然后,我如何将两列n和s组合成一个名为x的新列,使其看起来像这样:

  n  s     b     x
1 2 aa  TRUE  2 aa
2 3 bb FALSE  3 bb
3 5 cc  TRUE  5 cc

使用时将变量保存在R数据文件中时save,它将以保存它的会话中的名称保存.当我稍后从另一个会话加载它时,它加载了相同的名称,加载脚本不可能知道.此名称可能会覆盖加载会话中同名的现有变量.有没有办法将数据文件中的对象安全地加载到指定的变量名中,而没有破坏现有变量的风险？

例:

保存会话:

x = 5
save(x, file="x.Rda")

加载会话:

x = 7
load("x.Rda")
print(x) # This will print 5. Oops.

我希望它如何工作:

x = 7
y = load_object_from_file("x.Rda")
print(x) # should print 7
print(y) # should print 5

我发现了这个,如何在带有ggplot2的R中将标签放在geom_bar上,但它只是将标签(数字)放在一个条上.

这就是说,每个x轴有两个条,怎么做同样的事情？

我的数据和代码如下所示:

dat <- read.table(text = "sample Types Number
sample1 A   3641
sample2 A   3119
sample1 B   15815
sample2 B   12334
sample1 C   2706
sample2 C   3147", header=TRUE)

library(ggplot2)
bar <- ggplot(data=dat, aes(x=Types, y=Number, fill=sample)) + 
  geom_bar(position = 'dodge') + geom_text(aes(label=Number))

然后,我们将得到:

似乎数字文本也定位在"闪避"模式中.我搜索了geom_text手册来查找一些信息,但无法使其正常工作.

建议？

我想在字符串中找到一个字符的位置.

说: string = "the2quickbrownfoxeswere2tired"

我希望函数返回4和24- 2s 的字符位置string.