dplyr值摘要返回NA

我试图总结下面的数据框架，但我一直得到NA，而不是我预期的平均值。有人能解释为什么会这样吗

fbobjective<-data.frame(
  Participant=c("a","c","c"),
  "Part.2.or.3."=c(3,2,2),
  No_Photos=c(10,12,40)
)
fb_obj_v2<-fbobjective
#unique participant id's
fb_obj_v2$Participant<-paste0(fb_obj_v2$Participant,fb_obj_v2$"Part.2.or.3.")
fb_obj_v2$"Part.2.or.3."<-NULL
dim(fb_obj_v2)
#convert numbers to numbers or NA. bind Participant names back to this
numeric_results<-as.matrix(sapply(fb_obj_v2, as.numeric))
numeric_results<-as.data.frame(numeric_results)
numeric_results[,1]<-fb_obj_v2$Participant
numeric_results<-as.data.frame(numeric_results)
View(numeric_results)
#return data
res<-numeric_results %>% group_by(Participant) %>% summarise(mean("No_Photos"))
View(res)

---

fbobjective我们不需要引用
No\u照片

 numeric_results %>% 
        group_by(Participant) %>% 
        summarise( Mean = mean(No_Photos, na.rm=TRUE))
 #  Participant  Mean
 #        (chr) (dbl)
 #1          a3    10
 #2          c2    26

注意：我使用
na.rm=TRUE
删除
na
值（如果存在）