小编A. *_*man的帖子

我试图使用read.table()导入此TXT文件到R(包含由WMO提供的气象观测站的信息):

但是,当我尝试使用时

tmp <- read.table(file=...,sep=";",header=FALSE)

我收到这个错误

tmp <- read.table(file=...,sep=";",header=FALSE)

警告只有6702行中的3514行出现在' tmp'中.从快速查看文本文件,我找不到任何看似有问题的字符.

正如其他线程所建议的,我也试过了quote="".该EOF警告消失,但仍然只有3514线都是进口的.

关于如何read.table()为这个特定的txt文件工作的任何建议？

我的UI代码如下：

ui <- navbarPage(
theme = shinytheme("paper"),
title = div(img(src="ballerlablogo.png", style="margin-top: -14px;", height = 50)),

...

)

效果很好，但是网页选项卡上的标题看起来像这样：

有没有一种方法可以使页面标题成为“ Baller Lab”而又不会在导航栏中删除图像或在导航栏中添加“ baller lab”文本？

这是该网站的链接：BallerLab.us

我正在使用ggplot绘制条形图。如何更改条形图中组的顺序？在以下示例中，我希望将 type=1984 作为第一个条形堆栈，然后将 type=1985 放在 1984 之上，依此类推。

  series <- data.frame(
  time = c(rep(1, 4),rep(2, 4), rep(3, 4), rep(4, 4)),
  type = c(1984:1987),
  value = rpois(16, 10)
)

ggplot(series, aes(time, value, group = type)) +
  geom_col(aes(fill= type))

使用更改顺序series<- series[order(series$type, decreasing=T),]只会更改图例中的顺序，而不是绘图中的顺序。

我想从小标题中选择以字母R结尾且不以字符串（“ hc”）开头的列。例如，如果我有一个看起来像这样的数据框：

name  hc_1  hc_2  hc_3r  hc_4r  lw_1r  lw_2  lw_3r  lw_4   
Joe   1     2     3      2      1      5     2      2
Barb  5     4     3      3      2      3     3      1

为了做我想做的事，我尝试了很多选择，但是令我惊讶的是这个选择不起作用：

library(tidyverse)
data %>%
  select(ends_with("r"), !starts_with("hc"))

尝试时，出现以下错误：

错误：!starts_with("hc")必须求值为列的位置或名称，而不是逻辑向量

我也尝试过使用negate（）并得到相同的错误。

library(tidyverse)
data %>%
  select(ends_with("r"), negate(starts_with("hc")))

错误：negate(starts_with("hc"))必须求值到列的位置或名称，而不是函数

我想将答案保留在dplyr select函数中，因为一旦选择了变量，我将最终使用mutate_at反转它们，因此，一个整洁的解决方案是最好的。

谢谢！

我正在努力使数据表的一列中的文本不被换行。

我想避免在第一列中换行（因为这是使行大小变大的唯一部分），但应将选项保留在标题中（以避免滚动）。

我尝试过调整第一列的宽度，但是无论我使用什么大小，文本都会自动换行。

DT::datatable(chartfilter,
    rownames = FALSE,
    options=list(iDisplayLength=7,                    
                 bPaginate=FALSE,                  
                 bLengthChange=FALSE,                       
                 bFilter=FALSE,                                    
                 bInfo=FALSE,
                 rowid = FALSE,
                 autoWidth = FALSE,
                 ordering = FALSE,
                 scrollX = TRUE,
                 columnDefs = list(list(width='500px', targets = list(1)))

我还找到了一种解决方案，可以关闭整个表中的文字换行功能-但我不希望列标签使用这种方式。将其添加到tableoutput前面的UI中：

tags$style(HTML("#charttable  {white-space: nowrap;  }")),

这可能吗，还是我只需要在第一列中接受换行文本？感谢您可以获得的任何帮助，如果需要更多信息，请告诉我。

以下是我的 Windows 10 桌面上 R 的版本信息：

R version 3.4.1 (2017-06-30) -- "Single Candle"
Copyright (C) 2017 The R Foundation for Statistical Computing
Platform: x86_64-w64-mingw32/x64 (64-bit)

当我使用 R studio 运行脚本时，它在 32 位上运行。我从任务管理器获得此信息。在任务管理器的“进程”选项卡中，进程名称为

RStudio(32 bit)(3)

我该如何解释这一点？这是否会降低 R 使用我的机器处理能力的效率？如果是的话，有什么办法可以让它使用 64 位寄存器运行吗？

这是我的数据：

df1<-read.table(text=" Time1    Time2   Time3   MNR1    MNR2    MNR3

36  36  43  5   4   5
40  41  51  4   6   4
38  36  50  7   8   3
35  51  43  8   3   2
52  55  57  3   2   4
",header=TRUE)

我想有一个循环使用lapply（最好）使用回归模型和...来分析带有MNR1的Time1，带有MNR2的Time2和带有MRN3的时间3。

我尝试了以下功能，但无法获得结果：

R <- lapply(1:ncol(df1), function(x) lm(Time[,x] ~ MNR[,x]))

但这并没有给我每个小组的结果。我们可以使用lapply吗？

我有一个具有多种处理方式的数据集，这些数据集是通过read.csv导入到R中的。然后，我对数据进行了处理（以各种方式对其进行了归一化），现在有4个针对我的4种处理方式（listA，listB，listC，listD）的独立，标准化观察值列表。这些数据不是成对的，代表独立的观察结果（例如，a = 5和b = 6的样本量）。我想将这些列表组合成一个新的数据文件（可能是.csv或数据框），可以从中进行统计（ANOVA）和制图（箱形图）。最终数据集不应只是简单地将所有值附加到一个列表中的列表，而应根据其来自哪个列表将每个值列在一个列中。例如5.5 a 5 a 4.8 a 5.5 a 5.3 b 2.2 b 3.1等

我尝试追加，但是输出仅列出值，而不是值旁边的样本名称（a-d）。

my_list <- list(a= listA, b= listB, c= listC, d=listD)
my_list

我得到这个结果：

$a
 [1]  5.5 5 4.8  5.5  5.3  5.5  5.3
$b
 [1]  2.2 3.1 

但我想看到有两列的表格

a 5.5
a 5
a 4.8
a 5.5
a 5.3
b 2.2
b 3.1
etc.

尝试执行as.data.frame会产生以下错误：

my_df <-as.data.frame（my_list）错误（函数（...，row.names = NULL，check.rows = FALSE，check.names = TRUE，：参数暗示行数不同：

R是否有可能一次组合并计算3行？还是“简单”定义应该合并前3行，然后合并下3行，然后再合并下一行？例如（如下面的图片所示），您想将前3行合并为一行。使用中位数的SDO_ID和时间戳（与时间可比），使用均值的Therm

在左侧，我执行了str（）函数，以便您可以大致看到它的数量和数据格式