#deleting first row of text file
!tail -n +2 /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Methylated_Unmethylated_Files/MethylatedCGs_oysterv9.txt > /Users/claireellis/Desktop/MethylatedCGs_oysterv9_tail.txt
!head /Users/claireellis/Desktop/MethylatedCGs_oysterv9_tail.txt
!intersectBed -a /Users/claireellis/Desktop/MethylatedCGs_oysterv9_tail.txt -b /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Exons_v9_CGs.txt > /Users/claireellis/Desktop/MethylatedCGs_Exons.txt
#this is the command to get line counts for EXONS
!wc /Users/claireellis/Desktop/MethylatedCGs_Exons.txt
!intersectBed -a /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Methylated_Unmethylated_Files/ModeratelyMethylatedCGs_oysterv9.txt -b /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Exons_v9_CGs.txt > /Users/claireellis/Desktop/ModeratelyMethylatedCGs_Exons.txt
!wc /Users/claireellis/Desktop/ModeratelyMethylatedCGs_Exons.txt
!intersectBed -a /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Methylated_Unmethylated_Files/UnmethylatedCGs_oysterv9.txt -b /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Exons_v9_CGs.txt > /Users/claireellis/Desktop/UnmethylatedCGs_Exons.txt
!wc /Users/claireellis/Desktop/UnmethylatedCGs_Exons.txt
!intersectBed -a /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Methylated_Unmethylated_Files/MethylatedCGs_oysterv9.txt -b /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Introns_v9_CGs.txt > /Users/claireellis/Desktop/MethylatedCGs_Introns.txt
!wc /Users/claireellis/Desktop/MethylatedCGs_Introns.txt
!intersectBed -a /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Methylated_Unmethylated_Files/ModeratelyMethylatedCGs_oysterv9.txt -b /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Introns_v9_CGs.txt > /Users/claireellis/Desktop/ModeratelyMethylatedCGs_Introns.txt
!wc /Users/claireellis/Desktop/ModeratelyMethylatedCGs_Introns.txt
!intersectBed -a /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Methylated_Unmethylated_Files/UnmethylatedCGs_oysterv9.txt -b /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Introns_v9_CGs.txt > /Users/claireellis/Desktop/UnmethylatedCGs_Introns.txt
!wc /Users/claireellis/Desktop/UnmethylatedCGs_Introns.txt
!intersectBed -a /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Methylated_Unmethylated_Files/MethylatedCGs_oysterv9.txt -b /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/TEs_v9_CGs.txt > /Users/claireellis/Desktop/MethylatedCGs_TEs.txt
!wc /Users/claireellis/Desktop/MethylatedCGs_TEs.txt
!intersectBed -a /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Methylated_Unmethylated_Files/ModeratelyMethylatedCGs_oysterv9.txt -b /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/TEs_v9_CGs.txt > /Users/claireellis/Desktop/ModeratelyMethylatedCGs_TEs.txt
!wc /Users/claireellis/Desktop/ModeratelyMethylatedCGs_TEs.txt
!intersectBed -a /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Methylated_Unmethylated_Files/UnmethylatedCGs_oysterv9.txt -b /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/TEs_v9_CGs.txt > /Users/claireellis/Desktop/UnmethylatedCGs_TEs.txt
!wc /Users/claireellis/Desktop/UnmethylatedCGs_TEs.txt
!intersectBed -a /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Methylated_Unmethylated_Files/MethylatedCGs_oysterv9.txt -b /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Promoter_v9_CGs.txt > /Users/claireellis/Desktop/MethylatedCGs_Promoter.txt
!wc /Users/claireellis/Desktop/MethylatedCGs_Promoter.txt
!intersectBed -a /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Methylated_Unmethylated_Files/ModeratelyMethylatedCGs_oysterv9.txt -b /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Promoter_v9_CGs.txt > /Users/claireellis/Desktop/ModeratelyMethylatedCGs_Promoter.txt
!wc /Users/claireellis/Desktop/ModeratelyMethylatedCGs_Promoter.txt
!intersectBed -a /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Methylated_Unmethylated_Files/UnmethylatedCGs_oysterv9.txt -b /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Promoter_v9_CGs.txt > /Users/claireellis/Desktop/UnmethylatedCGs_Promoter.txt
!wc /Users/claireellis/Desktop/UnmethylatedCGs_Promoter.txt
!intersectBed -a /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Methylated_Unmethylated_Files/MethylatedCGs_oysterv9.txt -b /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Other_v9_CGs.txt > /Users/claireellis/Desktop/MethylatedCGs_Other.txt
!wc /Users/claireellis/Desktop/MethylatedCGs_Other.txt
!intersectBed -a /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Methylated_Unmethylated_Files/ModeratelyMethylatedCGs_oysterv9.txt -b /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Other_v9_CGs.txt > /Users/claireellis/Desktop/ModeratelyMethylatedCGs_Other.txt
!wc /Users/claireellis/Desktop/ModeratelyMethylatedCGs_Other.txt
!intersectBed -a /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Methylated_Unmethylated_Files/UnmethylatedCGs_oysterv9.txt -b /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Other_v9_CGs.txt > /Users/claireellis/Desktop/UnmethylatedCGs_Other.txt
!wc /Users/claireellis/Desktop/UnmethylatedCGs_Other.txt
!intersectBed -a /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Methylated_Unmethylated_Files/MethandUnmeth_Over5xCoverage.txt -b /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Exons_v9_CGs.txt > /Users/claireellis/Desktop/MethandUnmethCGs_Exons.txt
!intersectBed -a /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Methylated_Unmethylated_Files/MethandUnmeth_Over5xCoverage.txt -b /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Introns_v9_CGs.txt > /Users/claireellis/Desktop/MethandUnmethCGs_Introns.txt
!intersectBed -a /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Methylated_Unmethylated_Files/MethandUnmeth_Over5xCoverage.txt -b /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/TEs_v9_CGs.txt > /Users/claireellis/Desktop/MethandUnmethCGs_TEs.txt
!intersectBed -a /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Methylated_Unmethylated_Files/MethandUnmeth_Over5xCoverage.txt -b /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Promoter_v9_CGs.txt > /Users/claireellis/Desktop/MethandUnmethCGs_Promoter.txt
!intersectBed -a /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Methylated_Unmethylated_Files/MethandUnmeth_Over5xCoverage.txt -b /Volumes/web-1/Mollusk/174gm_analysis/Whole_Genome_Analyses/intersectBedfiles_StevensTracks/Other_v9_CGs.txt > /Users/claireellis/Desktop/MethandUnmethCGs_Other.txt
#code for R density plot for manuscript:
CDS<-read.delim("~/Desktop/MethandUnmethCGs_Exons.txt", header = TRUE, sep = "\t")
d<-density(CDS$score)
plot(d, xlab= "Proportion Methylation", ylim=c(0,10), col="red", lwd=2)
Introns<-read.delim("~/Desktop/MethandUnmethCGs_Introns.txt", header= TRUE, sep = "\t")
e<-density(Introns$score)
lines(e, xlab="Proportion Methylation", col="blue", lwd=2)
Promoter<-read.delim("~/Desktop/MethandUnmethCGs_Promoter.txt", header= TRUE, sep = "\t")
f<-density(Promoter$score)
lines(f, xlab="Proportion Methylation", col="darkgreen", lwd=2)
TEs<-read.delim("~/Desktop/MethandUnmethCGs_TEs.txt", header= TRUE, sep = "\t")
g<-density(TEs$score)
lines(g, xlab="Proportion Methylation", col="darkorange", lwd=2)