小编Phi*_*hil的帖子

我想在 RStudio 中执行有 2 个条件的连接。我的目标是复制如下所示的SQL 查询，但使用 R 语言：

SELECT
   ticket_id,
   sum(time_to_close)
FROM helpdesk_ticket ht
LEFT JOIN dim_date dd ON ht.create_date <= dd.formatted_date AND dd.formatted_date <= ht.closed_date
GROUP BY 1

假设 helpdesk_ticket 和 dim_date 是两个 R 数据帧，这是我尝试过的，但它在 left_join 中返回错误：

result <- helpdesk_ticket %>%
  left_join(dim_date, by = c("create_date" <= "formatted_date", "formatted_date" <= "closed_date")) %>%
  group_by(ticket_id) %>%
  summarise(time_to_close = sum(time_to_close))

鉴于下面的数据和图表，如何从图例中删除显示为“NA”的类别？我只是想传说，以显示颜色类别A，B和C。

library(tibble)
library(ggplot2)

mydata <- tibble(Time_dim = rep(1:10, 10),
                 Category = c(rep(NA, 10), rep(c(rep("A", 10), rep("B", 10), rep("C", 10)), 3)),
                 Attribute = c(rep("alpha", 10), rep("beta", 30), rep("omega", 30), rep("theta", 30)),
                 Data = runif(100))
mydata$Category <- factor(mydata$Category)
mydata$Attribute <- factor(mydata$Attribute)

ggplot(mydata, aes(x = Time_dim, y = Data, colour = Category)) +
geom_line() + facet_wrap(~ Attribute, ncol = 1, scales = "free")

我希望复制与RStudio的SuperZip Shiny仪表板类似的布局，可在此处使用：https ://shiny.rstudio.com/gallery/superzip-example.html

该应用程序的代码可在此处获取：https : //github.com/rstudio/shiny-examples/tree/master/063-superzip-example

根据该代码，我想在导航栏的右端添加一个图像（假设为Rstudio徽标），并在下图中用红色框突出显示。我认为我需要添加一些HTML和CSS代码，但不确定如何继续。

我的问题类似于以下问题：如何将图像插入闪亮的navbarPage（）上的导航栏中

但是，请注意，答案提供了将图像放在导航栏的左端的指示。我要求将其放在导航栏的右端。

我的程序中以前工作的 for 循环都没有按预期运行。我想知道我是否对 RStudio 环境/配置做了一些操作来打破 for 循环？...或者也许，我在这里缺少一些非常基本的东西？

考虑一个基本的 for 循环示例，例如

for (year in 2010:2015){
print(paste("The year is", year))}

由于某种原因，即使这个循环也没有向我的控制台返回任何内容。现在，考虑一个基本的 while 循环，比如说

count <- 0
while (count <10) {
  print(count)
  count = count +1}

这个 while 循环返回预期的

[1] 0
[1] 1
[1] 2
[1] 3
[1] 4
[1] 5
[1] 6
[1] 7
[1] 8
[1] 9

我正在尝试从 GEO/SRA 下载 BAM 格式的数据集，我可以使用它在 RStudio 中进行分析。

我尝试使用这种方法：我下载了 .sra 并将其转换为 .bam

prefetch GSM269238
sam-dump C:\Users\Desktop\sratoolkit.2.10.8-win64\bin\ncbi\SRA\sra\GSM2692389.sra --output-file GSM2692389.bam

然而，在 RStudio 中这不起作用，并返回一个错误，说它无法读取 bam 文件这是我的 R 代码；我正在使用 RSamTools

> bamfiles <- list.files("directory redacted due to privacy", ".bam")
> file.exists(bamfiles)
[1] TRUE
> 
> 
> #---> Define bam files for count step on Rsamtools
> 
> library("Rsamtools")
> bamfiles <- BamFileList(bamfiles, yieldSize=2000000)
> seqinfo(bamfiles)
Error in value[[3L]](cond) : 
  failed to open BamFile: SAM/BAM header missing or empty
  file: 'GSM2692389.bam'

有谁知道如何帮助我将 SRA 数据下载到可读的 .bam 文件中？任何帮助或指导将不胜感激，因为我真的很努力在截止日期前完成这件事。