小编Ale*_*lex的帖子

当比较评估为[]或时,我想做一些事情TRUE.

例如,假设比较是x > 1x可以是以下两者.

x = 2
x = []

如果x > 1给出[]或者我想显示'是' TRUE.

我可以

if x <= 1
    disp 'no'
else 
    disp 'yes'
end

但在没有否定比较运算符的情况下,有没有直接的方法呢？

编辑回答第一个答案:我想避免使用isempty运算符.

给出一个矢量

[1;2;3;5;6;7;10;11;12]

这是transpose(1:N)某些有序子集N,如何在每个运行序列中找到第一个值？这里,运行序列是由1分隔的整数序列,例如5;6;7.从上面的矢量我希望答案是:

[1;5;10]

例如,在尝试显示带有一百行的刻面图时:

library(ggplot2)
set.seed(111)
tmp_d <- data.frame(group = rep(1:100, each = 5), 
                    x = rep(1:5, times = 100),
                    y = runif(1:500))
## looks like
#   group x         y
# 1     1 1 0.5929813
# 2     1 2 0.7264811
# 3     1 3 0.3704220
# 4     1 4 0.5149238
# 5     1 5 0.3776632
# 6     2 1 0.4183373
# ...

ggplot(tmp_d, aes(x,y)) +
    geom_point() +
    facet_wrap(~ group, ncol = 1)

我在Rstudio的绘图窗口弄得一团糟,我无法放大或滚动:

不方便的解决方案涉及ggsave或knitr:

使用ggsave:

ggsave('tmp_20170104_long_ggplot.png', p, …

我在互联网上找到了以下代码

mod1 <- lm(mpg ~ weight + I(weight^2) + foreign, auto)

功能是什么I()？似乎结果weight^2是一样的I(weight^2).