R中两组计数的显着性检验

Question

我想按秒（counts）按给定时间间隔比较两组（A和B的计数（interval）的数量测试

a。）如果各组之间的计数总数有显着差异

b。）如果在给定的时间间隔内，“ A”组和“ B”组之间的计数存在显着差异。

我什至不确定我应该使用哪个测试（例如，Chi-test，t-test或其他），还不确定如何转换数据框架以在R中执行它。

这是我的虚拟示例：

变量：

group      <-  c("A","A","A","A","B","B","B","B")
interval   <-  c("30","60","90","120","30","60","90","120")
counts     <-  c(72,57,38,32,108,46,70,55)

数据框

df <-  data.frame(group,interval,counts)
df

正如我的帖子下方的评论所建议的那样，我使用了“重复测量分析”中的以下代码（请参阅LINK），但是我很确定它存在一些错误：

   ## Convert variables to factor
  demo1 <- within(df, {
  group <- factor(group)
  time <- factor(interval, levels = c("30", "60", "90","120"))})                                       
  par(cex = .6)

  with(demo1, interaction.plot(time, group, counts,
  ylim = c(0,108), lty= c(1, 12), lwd = 3,
  ylab = "counts", xlab = "time", trace.label = "group"))

  demo1.aov <- aov(counts ~ group * time + Error(counts), data = demo1)
  summary(demo1.aov)