-
Notifications
You must be signed in to change notification settings - Fork 1
/
medcodesextra.html
852 lines (764 loc) · 35.4 KB
/
medcodesextra.html
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
<!DOCTYPE html>
<html>
<head>
<meta charset="utf-8" />
<meta name="generator" content="pandoc" />
<meta http-equiv="X-UA-Compatible" content="IE=EDGE" />
<meta name="author" content="Mike Francis" />
<title>Medication code lists and extra formulas</title>
<script src="site_libs/header-attrs-2.16.2/header-attrs.js"></script>
<script src="site_libs/jquery-3.6.0/jquery-3.6.0.min.js"></script>
<meta name="viewport" content="width=device-width, initial-scale=1" />
<link href="site_libs/bootstrap-3.3.5/css/lumen.min.css" rel="stylesheet" />
<script src="site_libs/bootstrap-3.3.5/js/bootstrap.min.js"></script>
<script src="site_libs/bootstrap-3.3.5/shim/html5shiv.min.js"></script>
<script src="site_libs/bootstrap-3.3.5/shim/respond.min.js"></script>
<style>h1 {font-size: 34px;}
h1.title {font-size: 38px;}
h2 {font-size: 30px;}
h3 {font-size: 24px;}
h4 {font-size: 18px;}
h5 {font-size: 16px;}
h6 {font-size: 12px;}
code {color: inherit; background-color: rgba(0, 0, 0, 0.04);}
pre:not([class]) { background-color: white }</style>
<script src="site_libs/navigation-1.1/tabsets.js"></script>
<link href="site_libs/font-awesome-5.1.0/css/all.css" rel="stylesheet" />
<link href="site_libs/font-awesome-5.1.0/css/v4-shims.css" rel="stylesheet" />
<link rel="shortcut icon" href="favicon_package_v0.16/favicon-32x32.png">
<style type="text/css">
code{white-space: pre-wrap;}
span.smallcaps{font-variant: small-caps;}
span.underline{text-decoration: underline;}
div.column{display: inline-block; vertical-align: top; width: 50%;}
div.hanging-indent{margin-left: 1.5em; text-indent: -1.5em;}
ul.task-list{list-style: none;}
</style>
<style type="text/css">
code {
white-space: pre;
}
.sourceCode {
overflow: visible;
}
</style>
<style type="text/css" data-origin="pandoc">
pre > code.sourceCode { white-space: pre; position: relative; }
pre > code.sourceCode > span { display: inline-block; line-height: 1.25; }
pre > code.sourceCode > span:empty { height: 1.2em; }
.sourceCode { overflow: visible; }
code.sourceCode > span { color: inherit; text-decoration: inherit; }
div.sourceCode { margin: 1em 0; }
pre.sourceCode { margin: 0; }
@media screen {
div.sourceCode { overflow: auto; }
}
@media print {
pre > code.sourceCode { white-space: pre-wrap; }
pre > code.sourceCode > span { text-indent: -5em; padding-left: 5em; }
}
pre.numberSource code
{ counter-reset: source-line 0; }
pre.numberSource code > span
{ position: relative; left: -4em; counter-increment: source-line; }
pre.numberSource code > span > a:first-child::before
{ content: counter(source-line);
position: relative; left: -1em; text-align: right; vertical-align: baseline;
border: none; display: inline-block;
-webkit-touch-callout: none; -webkit-user-select: none;
-khtml-user-select: none; -moz-user-select: none;
-ms-user-select: none; user-select: none;
padding: 0 4px; width: 4em;
color: #aaaaaa;
}
pre.numberSource { margin-left: 3em; border-left: 1px solid #aaaaaa; padding-left: 4px; }
div.sourceCode
{ }
@media screen {
pre > code.sourceCode > span > a:first-child::before { text-decoration: underline; }
}
code span.al { color: #ff0000; } /* Alert */
code span.an { color: #008000; } /* Annotation */
code span.at { } /* Attribute */
code span.bu { } /* BuiltIn */
code span.cf { color: #0000ff; } /* ControlFlow */
code span.ch { color: #008080; } /* Char */
code span.cn { } /* Constant */
code span.co { color: #008000; } /* Comment */
code span.cv { color: #008000; } /* CommentVar */
code span.do { color: #008000; } /* Documentation */
code span.er { color: #ff0000; font-weight: bold; } /* Error */
code span.ex { } /* Extension */
code span.im { } /* Import */
code span.in { color: #008000; } /* Information */
code span.kw { color: #0000ff; } /* Keyword */
code span.op { } /* Operator */
code span.ot { color: #ff4000; } /* Other */
code span.pp { color: #ff4000; } /* Preprocessor */
code span.sc { color: #008080; } /* SpecialChar */
code span.ss { color: #008080; } /* SpecialString */
code span.st { color: #008080; } /* String */
code span.va { } /* Variable */
code span.vs { color: #008080; } /* VerbatimString */
code span.wa { color: #008000; font-weight: bold; } /* Warning */
</style>
<script>
// apply pandoc div.sourceCode style to pre.sourceCode instead
(function() {
var sheets = document.styleSheets;
for (var i = 0; i < sheets.length; i++) {
if (sheets[i].ownerNode.dataset["origin"] !== "pandoc") continue;
try { var rules = sheets[i].cssRules; } catch (e) { continue; }
var j = 0;
while (j < rules.length) {
var rule = rules[j];
// check if there is a div.sourceCode rule
if (rule.type !== rule.STYLE_RULE || rule.selectorText !== "div.sourceCode") {
j++;
continue;
}
var style = rule.style.cssText;
// check if color or background-color is set
if (rule.style.color === '' && rule.style.backgroundColor === '') {
j++;
continue;
}
// replace div.sourceCode by a pre.sourceCode rule
sheets[i].deleteRule(j);
sheets[i].insertRule('pre.sourceCode{' + style + '}', j);
}
}
})();
</script>
<style type = "text/css">
.main-container {
max-width: 940px;
margin-left: auto;
margin-right: auto;
}
img {
max-width:100%;
}
.tabbed-pane {
padding-top: 12px;
}
.html-widget {
margin-bottom: 20px;
}
button.code-folding-btn:focus {
outline: none;
}
summary {
display: list-item;
}
details > summary > p:only-child {
display: inline;
}
pre code {
padding: 0;
}
</style>
<style type="text/css">
.dropdown-submenu {
position: relative;
}
.dropdown-submenu>.dropdown-menu {
top: 0;
left: 100%;
margin-top: -6px;
margin-left: -1px;
border-radius: 0 6px 6px 6px;
}
.dropdown-submenu:hover>.dropdown-menu {
display: block;
}
.dropdown-submenu>a:after {
display: block;
content: " ";
float: right;
width: 0;
height: 0;
border-color: transparent;
border-style: solid;
border-width: 5px 0 5px 5px;
border-left-color: #cccccc;
margin-top: 5px;
margin-right: -10px;
}
.dropdown-submenu:hover>a:after {
border-left-color: #adb5bd;
}
.dropdown-submenu.pull-left {
float: none;
}
.dropdown-submenu.pull-left>.dropdown-menu {
left: -100%;
margin-left: 10px;
border-radius: 6px 0 6px 6px;
}
</style>
<script type="text/javascript">
// manage active state of menu based on current page
$(document).ready(function () {
// active menu anchor
href = window.location.pathname
href = href.substr(href.lastIndexOf('/') + 1)
if (href === "")
href = "index.html";
var menuAnchor = $('a[href="' + href + '"]');
// mark the anchor link active (and if it's in a dropdown, also mark that active)
var dropdown = menuAnchor.closest('li.dropdown');
if (window.bootstrap) { // Bootstrap 4+
menuAnchor.addClass('active');
dropdown.find('> .dropdown-toggle').addClass('active');
} else { // Bootstrap 3
menuAnchor.parent().addClass('active');
dropdown.addClass('active');
}
// Navbar adjustments
var navHeight = $(".navbar").first().height() + 15;
var style = document.createElement('style');
var pt = "padding-top: " + navHeight + "px; ";
var mt = "margin-top: -" + navHeight + "px; ";
var css = "";
// offset scroll position for anchor links (for fixed navbar)
for (var i = 1; i <= 6; i++) {
css += ".section h" + i + "{ " + pt + mt + "}\n";
}
style.innerHTML = "body {" + pt + "padding-bottom: 40px; }\n" + css;
document.head.appendChild(style);
});
</script>
<!-- tabsets -->
<style type="text/css">
.tabset-dropdown > .nav-tabs {
display: inline-table;
max-height: 500px;
min-height: 44px;
overflow-y: auto;
border: 1px solid #ddd;
border-radius: 4px;
}
.tabset-dropdown > .nav-tabs > li.active:before, .tabset-dropdown > .nav-tabs.nav-tabs-open:before {
content: "\e259";
font-family: 'Glyphicons Halflings';
display: inline-block;
padding: 10px;
border-right: 1px solid #ddd;
}
.tabset-dropdown > .nav-tabs.nav-tabs-open > li.active:before {
content: "\e258";
font-family: 'Glyphicons Halflings';
border: none;
}
.tabset-dropdown > .nav-tabs > li.active {
display: block;
}
.tabset-dropdown > .nav-tabs > li > a,
.tabset-dropdown > .nav-tabs > li > a:focus,
.tabset-dropdown > .nav-tabs > li > a:hover {
border: none;
display: inline-block;
border-radius: 4px;
background-color: transparent;
}
.tabset-dropdown > .nav-tabs.nav-tabs-open > li {
display: block;
float: none;
}
.tabset-dropdown > .nav-tabs > li {
display: none;
}
</style>
<!-- code folding -->
</head>
<body>
<div class="container-fluid main-container">
<div class="navbar navbar-inverse navbar-fixed-top" role="navigation">
<div class="container">
<div class="navbar-header">
<button type="button" class="navbar-toggle collapsed" data-toggle="collapse" data-bs-toggle="collapse" data-target="#navbar" data-bs-target="#navbar">
<span class="icon-bar"></span>
<span class="icon-bar"></span>
<span class="icon-bar"></span>
</button>
<a class="navbar-brand" href="index.html">Gene-vegetarianism interactions</a>
</div>
<div id="navbar" class="navbar-collapse collapse">
<ul class="nav navbar-nav">
<li>
<a href="index.html">
<span class="fa fa-home"></span>
Home
</a>
</li>
<li class="dropdown">
<a href="#" class="dropdown-toggle" data-toggle="dropdown" role="button" data-bs-toggle="dropdown" aria-expanded="false">
<span class="fa fa-solid fa-seedling"></span>
Full analysis code
<span class="caret"></span>
</a>
<ul class="dropdown-menu" role="menu">
<li>
<a href="DefineVeg.html">
<span class="fa fa-solid fa-seedling"></span>
1a. Define Vegetarians
</a>
</li>
<li class="dropdown-submenu">
<a href="#" class="dropdown-toggle" data-toggle="dropdown" role="button" data-bs-toggle="dropdown" aria-expanded="false">
<span class="fa fa-solid fa-clipboard-check"></span>
1b. Phenotype prep
</a>
<ul class="dropdown-menu" role="menu">
<li>
<a href="UKB_participantQC.html">
<span class="fa fa-solid fa-user"></span>
Participant QC
</a>
</li>
<li>
<a href="pheno.html">
<span class="fa fa-solid fa-syringe"></span>
Prepare phenotype table
</a>
</li>
<li>
<a href="skim-phenotype.html">
<span class="fa fa-solid fa-list"></span>
Pheno skim
</a>
</li>
</ul>
</li>
<li>
<a href="genoQC.html">
<span class="fa fa-solid fa-filter"></span>
1c. Genotype prep
</a>
</li>
<li class="dropdown-submenu">
<a href="#" class="dropdown-toggle" data-toggle="dropdown" role="button" data-bs-toggle="dropdown" aria-expanded="false">
<span class="fa fa-solid fa-users"></span>
2. Matching + Veg. Effect
</a>
<ul class="dropdown-menu" role="menu">
<li>
<a href="MatchEffect.html">
<span class="fa fa-solid fa-users"></span>
2. Matching + Veg. Effect
</a>
</li>
<li>
<a href="CompareRaw.html">
<span class="fa fa-regular fa-square"></span>
Compare raw phenotype values
</a>
</li>
</ul>
</li>
<li>
<a href="GWAS.html">
<span class="fa fa-solid fa-dna"></span>
3. Vegetarianism GWAS
</a>
</li>
<li class="dropdown-submenu">
<a href="#" class="dropdown-toggle" data-toggle="dropdown" role="button" data-bs-toggle="dropdown" aria-expanded="false">
<span class="fa fa-solid fa-bolt"></span>
4. Gene x Vegetarianism GWIS
</a>
<ul class="dropdown-menu" role="menu">
<li>
<a href="GWIS.html">GWIS in GEM</a>
</li>
<li>
<a href="hudson.html">Make interactive Manhattan plots</a>
</li>
</ul>
</li>
<li class="dropdown-submenu">
<a href="#" class="dropdown-toggle" data-toggle="dropdown" role="button" data-bs-toggle="dropdown" aria-expanded="false">
<span class="fa fa-regular fa-folder"></span>
Extra scripts
</a>
<ul class="dropdown-menu" role="menu">
<li>
<a href="medcodesextra.html">Medication code lists and extra formulas</a>
</li>
<li>
<a href="maxunrelated.html">Max unrelated script</a>
</li>
</ul>
</li>
</ul>
</li>
<li class="dropdown">
<a href="#" class="dropdown-toggle" data-toggle="dropdown" role="button" data-bs-toggle="dropdown" aria-expanded="false">
<span class="fa fa-solid fa-dna"></span>
Interactive Manhattan Plots
<span class="caret"></span>
</a>
<ul class="dropdown-menu" role="menu">
<li>
<a href="GxEplots.html">
<span class="fa fa-solid fa-dna"></span>
GWIS (variant level)
</a>
</li>
<li>
<a href="GxEplots.gene.html">
<span class="fa fa-solid fa-dna"></span>
GWIS (gene level)
</a>
</li>
<li>
<a href="GWASplot.html">
<span class="fa fa-solid fa-dna"></span>
GWAS
</a>
</li>
</ul>
</li>
</ul>
<ul class="nav navbar-nav navbar-right">
</ul>
</div><!--/.nav-collapse -->
</div><!--/.container -->
</div><!--/.navbar -->
<div id="header">
<h1 class="title toc-ignore">Medication code lists and extra
formulas</h1>
<h4 class="author">Mike Francis</h4>
<h4 class="date">2022-10-09 21:41:24</h4>
</div>
<div class="sourceCode" id="cb1"><pre class="sourceCode r"><code class="sourceCode r"><span id="cb1-1"><a href="#cb1-1" aria-hidden="true" tabindex="-1"></a><span class="fu">read.csv</span>(<span class="st">"src/components/sexHormoneMeds.csv"</span>)</span></code></pre></div>
<pre><code>## code name
## 1 1140869270 "medroxyprogesterone"
## 2 1140910674 "ethinylnortestosterone"
## 3 1140857656 "methyltestosterone product"
## 4 1140865136 "yohimbine/pemoline/methyltestosterone"
## 5 1140868532 "testosterone product"
## 6 1140857690 "oestradiol 25mg implant 36 week"
## 7 1140857700 "oestradiol 1mg/1ml injection"
## 8 1141165318 "cetrorelix"
## 9 1140917306 "bicalutamide"
## 10 1140917310 "casodex 50mg tablet"
## 11 1140917448 "oestradiol 1.25g/dose gel"
## 12 1140917450 "oestrogel 1.25g gel"
## 13 1141171536 "ganirelix"
## 14 1140884638 "clomiphene"
## 15 1140884634 "cyproterone"
## 16 1140870186 "oestrifen 10mg tablet"
## 17 1140921100 "triptorelin"
## 18 1140868984 "nafarelin"
## 19 1140868978 "gestrinone"
## 20 1140884544 "leuprorelin"
## 21 1140870248 "buserelin"
## 22 1140870194 "goserelin"
## 23 1141157394 "goserelin product"
## 24 1140868882 "gonadorelin"
## 25 1141182558 "urofollitropin"
## 26 1140868722 "cyclofenil"
## 27 1140868580 "norethisterone"
## 28 1140869328 "ethinyloestradiol+norethisterone acetate 20mcg/1mg tablet"
## 29 1140869356 "mestranol+norethisterone 50micrograms/1mg tablet"
## 30 1141157406 "norethisterone product"
## 31 1141168324 "oestradiol+norethisterone acetate 1mg/0.5mg tablet"
## 32 1141181298 "ethinylestradiol+norethisterone acetate 20mcg/1mg tablet"
## 33 1141181204 "ethinylestradiol+norgestimate 35mcg/250mcg tablet"
## 34 1141181218 "ethinylestradiol product"
## 35 1141181220 "ethinylestradiol"
## 36 1141181240 "ethinylestradiol+levonorgestrel 30mcg/150mcg tablet"
## 37 1141181286 "ethinylestradiol+desogestrel 20mcg/150mcg tablet"
## 38 1140869348 "ethinyloestradiol+norgestimate 35mcg/250mcg tablet"
## 39 1140868520 "estracombi tts patch"
## 40 1140857628 "gestone 10mg/1ml injection"
## 41 1140857704 "ovestin 250micrograms tablet"
## 42 1140857706 "oestriol 250micrograms tablet"
## 43 1140857708 "quinestradol"
## 44 1140857710 "pentovis 250micrograms tablet"
## 45 1140857714 "quinestrol"
## 46 1140857716 "estrovis 4mg tablet"
## 47 1140857736 "virormone 10mg/1ml injection"
## 48 1140857912 "desogestrel"
## 49 1140857918 "lynoestrenol"
## 50 1140857920 "minilyn tablet"
## 51 1140858324 "medroxyprogest 80mg/ml suspension 100ml"
## 52 1140858332 "sh-420 10mg tablet"
## 53 1140858338 "drostanolone propionate"
## 54 1140858340 "masteril 100mg/1ml injection"
## 55 1140858348 "noltam 10mg tablet"
## 56 1140864196 "climagest 1mg tablet"
## 57 1140864502 "testotop tts 15mg transdermal patch"
## 58 1140868400 "oestriol product"
## 59 1140868372 "climaval 1mg tablet"
## 60 1140868406 "conjugated oestrogens"
## 61 1140868408 "premarin 625micrograms tablet"
## 62 1140868420 "piperazine oestrone sulphate"
## 63 1140868422 "harmogen 1.5mg tablet"
## 64 1140868472 "vagifem 25mcg pessary"
## 65 1140868482 "tibolone"
## 66 1140868488 "allyloestrenol"
## 67 1140868490 "gestanin 5mg tablet"
## 68 1140868494 "dydrogesterone"
## 69 1140868496 "duphaston 10mg tablet"
## 70 1140868508 "cyclo-progynova 1mg tablet"
## 71 1140868512 "syntex menophase tablet"
## 72 1140868514 "trisequens tablet"
## 73 1140868518 "nuvelle tablet"
## 74 1140868524 "androcur 50mg tablet"
## 75 1140868526 "mesterolone"
## 76 1140868528 "pro-viron 25mg tablet"
## 77 1140868534 "primoteston depot 250mg/1ml oily injection"
## 78 1140868536 "restandol 40mg capsule"
## 79 1140868538 "sustanon 100 oily injection"
## 80 1140868584 "primolut-n 5mg tablet"
## 81 1140868586 "utovlan 5mg tablet"
## 82 1140868588 "progesterone product"
## 83 1140868590 "cyclogest 200mg suppository"
## 84 1140868614 "deca-durabolin 25mg/1ml oily injection"
## 85 1140868618 "stanozolol"
## 86 1140868620 "stromba 5mg tablet"
## 87 1140868628 "humegon 75iu injection (pdr for recon)+solvent"
## 88 1140869032 "dienoestrol"
## 89 1140869034 "ortho-gynest 500micrograms pessary"
## 90 1140869166 "ethinyloestradiol+desogestrel 20mcg/150mcg tablet"
## 91 1140869170 "conova 30 tablet"
## 92 1140869172 "ethinyloestradiol+ethynodiol diacetate 30mcg/2mg tablet"
## 93 1140869174 "eugynon 30 tablet"
## 94 1140869176 "logynon tablet"
## 95 1140869180 "microgynon 30 tablet"
## 96 1140869184 "ovran 30 tablet"
## 97 1140869186 "ovranette tablet"
## 98 1140869188 "schering pc4 tablet"
## 99 1140869190 "trinordiol tablet"
## 100 1140869248 "ethinyloestradiol+levonorgestrel 30mcg/150mcg tablet"
## 101 1140869254 "binovum tablet"
## 102 1140869256 "brevinor tablet"
## 103 1140869258 "neocon 1/35 tablet"
## 104 1140869260 "norimin tablet"
## 105 1140869262 "ovysmen tablet"
## 106 1140869264 "synphase tablet"
## 107 1140869266 "trinovum tablet"
## 108 1140869272 "neogest tablet"
## 109 1140869276 "micronor tablet"
## 110 1140869278 "noriday tablet"
## 111 1140869282 "noristerat 200mg/1ml oily injection"
## 112 1140869324 "loestrin 20 tablet"
## 113 1140869332 "minulet tablet"
## 114 1140869334 "femodene tablet"
## 115 1140869338 "tri-minulet tablet"
## 116 1140869340 "triadene tablet"
## 117 1140869346 "cilest tablet"
## 118 1140869352 "norinyl-1 tablet"
## 119 1140869354 "ortho-novin 1/50 tablet"
## 120 1140869360 "ethynodiol diacetate"
## 121 1140869362 "femulen tablet"
## 122 1140869366 "levonorgestrel"
## 123 1140869368 "microval tablet"
## 124 1140869370 "norgeston tablet"
## 125 1140870060 "polyestradiol phosphate"
## 126 1140870052 "honvan 100mg tablet"
## 127 1140870062 "estradurin 40mg injection (pdr for recon)+diluent"
## 128 1140870070 "stilboestrol"
## 129 1140870076 "apstil 1mg tablet"
## 130 1140876638 "cyproterone acetate+ethinyloestradiol"
## 131 1140879554 "estramustine"
## 132 1140884622 "oestrogen product"
## 133 1140884624 "fosfestrol"
## 134 1140884626 "mestranol"
## 135 1140884688 "hydroxyprogesterone"
## 136 1140909906 "estropipate"
## 137 1140910562 "gestonorone"
## 138 1140921088 "tridestra tablet"
## 139 1141157404 "ethinyloestradiol product"
## 140 1141157410 "levonorgestrel product"
## 141 1141157492 "mestranol product"
## 142 1141166196 "etonogestrel"
## 143 1141166354 "testoderm 6mg/24hours transdermal patch"
## 144 1141166366 "ethinyloestradiol+gestodene 20micrograms/75micrograms tablet"
## 145 1141167206 "oestrogel 0.06% gel"
## 146 1141177150 "adgyn medro 5mg tablet"
## 147 1141177158 "adgyn estro 2mg tablet"
## 148 1141177226 "adgyn combi 2mg tablet"
## 149 1141179822 "ethinylestradiol+drospirenone 30micrograms/3mg tablet"
## 150 1141179820 "drospirenone"
## 151 1141180988 "dienestrol"
## 152 1141181594 "estriol product"
## 153 1141181700 "estradiol product"
## 154 1141182794 "desogestrel product"
## 155 1141190580 "conjugated oestrogens 0.3mg / medroxyprogesterone 1.5mg tab"
## 156 1141192344 "cyproterone acetate+ethinylestradiol"
## 157 1141192874 "ethinylestradiol+norelgestromin 600mcg/6mg transdermal patch"
## 158 1141193272 "testogel 50mg gel 5g sachet"
## 159 1141202030 "estradot 25micrograms patch"
## 160 1141181818 "estradiol+norethisterone acetate 1mg/0.5mg tablet"</code></pre>
<div class="sourceCode" id="cb3"><pre class="sourceCode r"><code class="sourceCode r"><span id="cb3-1"><a href="#cb3-1" aria-hidden="true" tabindex="-1"></a><span class="fu">read.table</span>(<span class="st">"src/components/phenocodes.txt"</span>, <span class="at">header=</span>F)</span></code></pre></div>
<pre><code>## V1 V2
## 1 30620 Alanine_aminotransferase
## 2 30600 Albumin
## 3 30610 Alkaline_phosphatase
## 4 30630 Apolipoprotein_A
## 5 30640 Apolipoprotein_B
## 6 30650 Aspartate_aminotransferase
## 7 30710 C-reactive_protein
## 8 30680 Calcium
## 9 30690 Cholesterol
## 10 30700 Creatinine
## 11 30720 Cystatin_C
## 12 30660 Direct_bilirubin
## 13 30730 Gamma_glutamyltransferase
## 14 30740 Glucose
## 15 30750 Glycated_haemoglobin_(HbA1c)
## 16 30760 HDL_cholesterol
## 17 30770 IGF-1
## 18 30780 LDL_direct
## 19 30790 Lipoprotein_A
## 20 30800 Oestradiol
## 21 30810 Phosphate
## 22 30820 Rheumatoid_factor
## 23 30830 SHBG
## 24 30850 Testosterone
## 25 30840 Total_bilirubin
## 26 30860 Total_protein
## 27 30870 Triglycerides
## 28 30880 Urate
## 29 30670 Urea
## 30 30890 Vitamin_D</code></pre>
<div class="sourceCode" id="cb5"><pre class="sourceCode r"><code class="sourceCode r"><span id="cb5-1"><a href="#cb5-1" aria-hidden="true" tabindex="-1"></a><span class="fu">writeLines</span>(<span class="fu">readLines</span>(<span class="st">"src/components/SSRI_Meds.R"</span>,<span class="at">warn =</span> F))</span></code></pre></div>
<pre><code>## #SSRIs=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
##
## ssricodes<-c(1140921600,
## 1141180212,
## 1140879540,
## 1140867888,
## 1140867878,
## 1140867876,
## 1140867884,
## 1140867888,
## 1140867860
## )
##
## names(ssricodes)<-c("citalopram",
## "escitalopram",
## "fluoxetine",
## "paroxetine",
## "sertraline",
## "prozac 20mg capsule",
## "lustral 50mg tablet",
## "paroxetine",
## "faverin 50mg tablet"
## )</code></pre>
<div class="sourceCode" id="cb7"><pre class="sourceCode r"><code class="sourceCode r"><span id="cb7-1"><a href="#cb7-1" aria-hidden="true" tabindex="-1"></a><span class="fu">writeLines</span>(<span class="fu">readLines</span>(<span class="st">"src/components/cbat.R"</span>,<span class="at">warn =</span> F))</span></code></pre></div>
<pre><code>## #Vermeulen equation
## #CBAT = calculated bioavailable testosterone
## #Rcode from: https://labrtorian.com/tag/vermeulen-equation/
## # where testosterone is reported in nmol/L (same as UKB),
## # sex hormone binding globulin (SHBG) is reported in nmol/L (same as UKB),
## # and albumin is reported in g/L (same as UKB)
## # see also http://www.issam.ch/freetesto.htm which does the Vermeulen calc.
## # Ruth et al 2020 does the Morris for BT and I agree.
##
## cbat <- function(TT,SHBG,ALB = 43){
## Ka <- 3.6*10^4 #called kat in ruth
## Kshbg <- 10^9 #called kt in ruth
## N <- 1 + Ka*ALB/69000 #called k1 in ruth
## a <- N*Kshbg #called a in ruth
## b <- N + Kshbg*(SHBG - TT)/10^9
## c <- -TT/10^9
## FT <- (-b + sqrt(b^2 - 4*a*c))/(2*a)*10^9
## cbat <- N*FT
## #return(list(free.T = FT, cbat = cbat))
## BT<-exp(-.266+.955*log(TT)-0.228 * log (SHBG)) #Morris equation
## return(list(freeTest = FT, bioavailableTest = BT))
## }
##
## # cbat(TT = 3.47, SHBG = 50, ALB = 40)
## #
## # #3.47 nmol/L = 100.08 ng/dL
## # 100.08/3.47 #[1] 28.8415
## # #divide by 28.8 to go from ng/dL to nmol/L
## #
## # #228.4 ng/dL
## # 228.4/28.8
## # 7.93
## #
## # cbat(7.93, SHBG = 40)
## # #0.1351578 nmol/L to ng/dL #conversion : http://unitslab.com/node/136
## # 0.1351578*28.8
## #
## # #free T in nmol/L
## # TT1<-3.47
## # SHBG1<-50
## #
## #
## # BT<-exp(-.266+.955*log(TT1)-0.228 * log (SHBG1))
## # BT</code></pre>
<div class="sourceCode" id="cb9"><pre class="sourceCode r"><code class="sourceCode r"><span id="cb9-1"><a href="#cb9-1" aria-hidden="true" tabindex="-1"></a><span class="fu">writeLines</span>(<span class="fu">readLines</span>(<span class="st">"src/components/manyColsToDummy.R"</span>,<span class="at">warn =</span> F))</span></code></pre></div>
<pre><code>## #A base-R script that searches over many input columns for input values
## #and returns a dataframe of dummy variables that indicate if the values
## #were present in these columns.
##
## #Note that grep functions use regular expressions as their search terms, so if you are trying to match a string or number, adding ^ and $ is necessary!
## #For example, if you want to match 612, use "^612$"
##
##
##
## manyColsToDummy<-function(search_terms, search_columns,
## output_table){
## #initialize output table
## temp_table<-data.frame(matrix(ncol=length(search_terms),
## nrow= nrow(search_columns)))
## colnames(temp_table)<-search_terms
##
## #make table
## for (i in 1:length(search_terms)){
## vec<-rowSums(sapply(search_columns,
## function(x) grepl(search_terms[i], x, ignore.case = TRUE)
## ))>0
## temp_table[,i]<-vec
## }
## temp_table<-sapply(temp_table, as.integer, as.logical)
## temp_table<-as.data.frame(temp_table)
## assign(x = output_table, value = temp_table, envir = globalenv())
## }
##
##
## #Example
## #manyColsToDummy("find_this", big_table[,columns_to_look_in], "dummy_output_table")
##
## #Visual example found here: https://ibb.co/VwHvBLT</code></pre>
</div>
<script>
// add bootstrap table styles to pandoc tables
function bootstrapStylePandocTables() {
$('tr.odd').parent('tbody').parent('table').addClass('table table-condensed');
}
$(document).ready(function () {
bootstrapStylePandocTables();
});
</script>
<!-- tabsets -->
<script>
$(document).ready(function () {
window.buildTabsets("TOC");
});
$(document).ready(function () {
$('.tabset-dropdown > .nav-tabs > li').click(function () {
$(this).parent().toggleClass('nav-tabs-open');
});
});
</script>
<!-- code folding -->
<!-- dynamically load mathjax for compatibility with self-contained -->
<script>
(function () {
var script = document.createElement("script");
script.type = "text/javascript";
script.src = "https://mathjax.rstudio.com/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML";
document.getElementsByTagName("head")[0].appendChild(script);
})();
</script>
</body>
</html>