tanu/LSHTM_analysis
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

removed setDT and replaced with dplyr alt in position_count_bp.R

Browse source
This commit is contained in:
Tanushree Tunstall 2022-08-14 14:19:09 +01:00
parent 65d697d3a2
commit da8f8d90d4
5 changed files with 210 additions and 110 deletions
Download patch file Download diff file Expand all files Collapse all files

34
scripts/Header_TT.R
View file

@ -222,22 +222,9 @@ consurf_palette2 = c("0" = "yellow2"
, "8" = "orchid4"
, "9" = "darkorchid4")
consurf_colours = c(
"0" = rgb(1.00,1.00,0.59)
, "9" = rgb(0.63,0.16,0.37)
, "8" = rgb(0.94,0.49,0.67)
, "7" = rgb(0.98,0.78,0.86)
, "6" = rgb(0.98,0.92,0.96)
, "5" = rgb(1.00,1.00,1.00)
, "4" = rgb(0.84,0.94,0.94)
, "3" = rgb(0.65,0.86,0.90)
, "2" = rgb(0.29,0.69,0.75)
, "1" = rgb(0.04,0.49,0.51)
)
# consurf_bp_colours = c(
# "0" = rgb(1.00,1.00,0.59)
# decreasing levels mess legend
# consurf_colours_LEVEL = c(
# "0" = rgb(1.00,1.00,0.59)
# , "9" = rgb(0.63,0.16,0.37)
# , "8" = rgb(0.94,0.49,0.67)
# , "7" = rgb(0.98,0.78,0.86)
@ -247,7 +234,20 @@ consurf_colours = c(
# , "3" = rgb(0.65,0.86,0.90)
# , "2" = rgb(0.29,0.69,0.75)
# , "1" = rgb(0.04,0.49,0.51)
# )
# )
consurf_colours = c(
"0" = rgb(1.00,1.00,0.59)
, "1" = rgb(0.04,0.49,0.51)
, "2" = rgb(0.29,0.69,0.75)
, "3" = rgb(0.65,0.86,0.90)
, "4" = rgb(0.84,0.94,0.94)
, "5" = rgb(1.00,1.00,1.00)
, "6" = rgb(0.98,0.92,0.96)
, "7" = rgb(0.98,0.78,0.86)
, "8" = rgb(0.94,0.49,0.67)
, "9" = rgb(0.63,0.16,0.37)
)
##################################################