Question

snp1 <- c("AA", "AT", "AA", "TT", "AA", "AT", "AA", "AA", "AA", "AT")
snp2 <- c("GG", "GC", "GG", "CC", "CC", "GC", "GG", "GG", "GG", "GC")
df1 <- data.frame(snp1, snp2)

num1 <- c(1, 2, 1, 3, 1, 2, 1, 1, 1, 2)
num2 <- c(1, 2, 1, 3, 3, 2, 1, 1, 1, 2)
df2 <- data.frame(num1, num2)

这是在R中完成的。我有一个对象df1，我想将其转换为df2。对于df1中的每一列，最常见的值转换为1，第二个最常见的值转换为2，等等。我该如何有效地做到这一点？

Answer 1

主题的变化：

<form ng-submit="submitForm(uploadForm)" enctype="multipart/form-data" name="uploadForm">
    <input type="text" name="fileName" id="image-name"/>
    <input type="file" ngf-select ng-model="file" name="file" ngf-pattern="'image/*' "accept="image/*" required/>
    Image thumbnail: <img style="width:100px;" ngf-thumbnail="file || '/thumb.jpg'"/>
    <button type="submit">Upload Image</button>
    <p>{{progress}}</p>
</form>

在数值矩阵中转换snp基因型的数据框

1 个答案: