我有一个数据列表,我在这里用dat表示。我试图以一种方式总结数据,这种方式给出了每个列表中元素的数量,以及每个元素的独特元素和频率(尽管在示例文件中有4个元素,但它在实际中可能要大得多)文件)。
dat = list(c("a","b","c","d"),
c("a","a"),
c("b"),
c("c","a","c"))
Num_element = sapply(dat, length)
Num_table = sapply(dat, table)
Num_unique = sapply(Num_table, length)
我希望得到某种东西(我知道在很多方面都是错误的)
Summary_dat = cbind.data.frame(Num_element,Num_unique, Num_table)
基本上我想象的可能是嵌套的数据帧,输出可能如下所示:
Num_element Num_unique Num_table
1 4 4 a b c d
2 2 1 1 1 1 1(in the same line as above)
3 1 1
4 3 2
我不确定是否可以按照我的要求行事。如果没有,那么表示数据的好方法是什么,然后也可以导出到excel?
答案 0 :(得分:1)
这可能是你想要的东西吗?
//First js
function myFunction(x) {
var opacity = x.options[x.selectedIndex].value;
var el = document.getElementById("p1");
if (el.style.opacity !== undefined) {
el.style.opacity = opacity;
} else {
alert("Your browser doesn't support this!");
}
}
//Second js
function myFunction() {
var x = document.getElementById("myTopnav");
if (x.className === "topnav") {
x.className += " responsive";
} else {
x.className = "topnav";
}
}