comparison C and D finder/.Rhistory @ 1:b791e2bee65c draft

Uploaded
author jfb
date Wed, 11 Dec 2019 13:35:46 -0500
parents
children
comparison
equal deleted inserted replaced
0:3e5fdf933646 1:b791e2bee65c
1 ?rnorm
2 ?rnorm
3 ?rnorm
4 pwr
5 ?pwr
6 ??pwr
7 power.t.test(n=6, power = .7, type = "two.sample", alternative = "two.sided")
8 power.t.test(n=6, power = .9, type = "two.sample", alternative = "two.sided")
9 setwd("C:/Users/John Blankenhor/Downloads/commonality_finder-3e5fdf933646/commonality_finder-3e5fdf933646/C and D finder")
10 FirstSubstrateSet<- read.csv("input1.csv", stringsAsFactors=FALSE)
11 Firstsubbackfreq<- read.csv("input2.csv", header=FALSE, stringsAsFactors=FALSE)
12 SecondSubstrateSet<- read.csv("input3.csv", stringsAsFactors=FALSE)
13 SecondSubstrateSet<- read.csv("input3.csv", stringsAsFactors=FALSE, sep = ",")
14 SecondSubstrateSet<- read.csv("input3.csv", stringsAsFactors=FALSE, header = TRUE)
15 SecondSubstrateSet<- read.csv("input3.csv", stringsAsFactors=FALSE, header = FALSE)
16 FirstSubstrateSet<- read.csv("input1.csv", stringsAsFactors=FALSE, header = FALSE)
17 FirstSubstrateSet<- FirstSubstrateSet[2:nrow(FirstSubstrateSet),]
18 FirstSubstrateSet<- read.csv("input1.csv", stringsAsFactors=FALSE, header = FALSE)
19 Firstsubbackfreq<- read.csv("input2.csv", header=FALSE, stringsAsFactors=FALSE)
20 FirstSubstrateSet<- FirstSubstrateSet[2:nrow(FirstSubstrateSet),]
21 SecondSubstrateSet<- read.csv("input3.csv", stringsAsFactors=FALSE, header = FALSE)
22 Secondsubbackfreq<- read.csv("input4.csv", header=FALSE, stringsAsFactors=FALSE)
23 SecondSubstrateSet<- SecondSubstrateSet[2:nrow(SecondSubstrateSet),]
24 ThirdSubstrateSet<- read.csv("input5.csv", stringsAsFactors=FALSE, header = FALSE)
25 Thirdsubbackfreq<- read.csv("input6.csv", header=FALSE, stringsAsFactors=FALSE)
26 ThirdSubstrateSet<- ThirdSubstrateSet[2:nrow(ThirdSubstrateSet),]
27 source('C:/Users/John Blankenhor/Downloads/commonality_finder-3e5fdf933646/commonality_finder-3e5fdf933646/C and D finder/CandD.R')
28 #ff you want ONLY FULL MOTIFS, put "YES" here, please use all caps
29 FullMotifsOnly_questionmark<-"YES"