# NOT RUN {
##Extract the species-specific miRNAs and the shared miRNAs among parents and offspring.
##output_file = "venn_list"
venn_list <- miVennData(P1_RPM = P1_miRNA_rpm,
P2_RPM = P2_miRNA_rpm,
F1_RPM = F1_miRNA_rpm,
rpm_threshold = 1,output_file = "venn_list")
##output_file = "P1_specific"
P1_specific <- miVennData(P1_RPM = P1_miRNA_rpm,
P2_RPM = P2_miRNA_rpm,
F1_RPM = F1_miRNA_rpm,
rpm_threshold = 1,output_file = "P1_specific")
##output_file = "P2_specific"
P2_specific <- miVennData(P1_RPM = P1_miRNA_rpm,
P2_RPM = P2_miRNA_rpm,
F1_RPM = F1_miRNA_rpm,
rpm_threshold = 1,output_file = "P2_specific")
##output_file = "F1_specific"
F1_specific <- miVennData(P1_RPM = P1_miRNA_rpm,
P2_RPM = P2_miRNA_rpm,
F1_RPM = F1_miRNA_rpm,
rpm_threshold = 1,output_file = "F1_specific")
##output_file = "all_common"
all_common <- miVennData(P1_RPM = P1_miRNA_rpm,
P2_RPM = P2_miRNA_rpm,
F1_RPM = F1_miRNA_rpm,
rpm_threshold = 1,output_file = "all_common")
# }
Run the code above in your browser using DataLab