使用java脚本更改div值

Question

我正在尝试编写当天应用程序的一个单词但是当我尝试更改div值时它不会改变，这是我的代码：

library(reshape2)
df2 <- as.data.frame.matrix(table(melt(df1, id.var='RespondentID')[-2], useNA='ifany'))
colnames(df2) <- paste0('Freq', colnames(df2))
cbind(df1, df2)
#   RespondentID Case.A Case.B Case.C FreqBlue FreqRed FreqNA
#1    4003491503    Red   Blue   Blue        2       1      0
#2    4003491653   Blue    Red    Red        1       2      0
#3    4003491982    Red   Blue    Red        1       2      0
#4    4003494862    Red    Red   <NA>        0       2      1
#15   4003494880   Blue   Blue   Blue        3       0      0

所以你能给我解决问题的方法

Answer 1

您正在使用document.write()覆盖现有的HTML文档，包括<div id="p"></div>。因此，当您尝试使用document.getElementById("p")获取时，它将返回null。