-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathproject1.html
149 lines (135 loc) · 9.17 KB
/
project1.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
<html>
<head>
<style type="text/css">
.knitr .inline {
background-color: #f7f7f7;
border:solid 1px #B0B0B0;
}
.error {
font-weight: bold;
color: #FF0000;
}
.warning {
font-weight: bold;
}
.message {
font-style: italic;
}
.source, .output, .warning, .error, .message {
padding: 0 1em;
border:solid 1px #F7F7F7;
}
.source {
background-color: #f5f5f5;
}
.rimage .left {
text-align: left;
}
.rimage .right {
text-align: right;
}
.rimage .center {
text-align: center;
}
.hl.num {
color: #AF0F91;
}
.hl.str {
color: #317ECC;
}
.hl.com {
color: #AD95AF;
font-style: italic;
}
.hl.opt {
color: #000000;
}
.hl.std {
color: #585858;
}
.hl.kwa {
color: #295F94;
font-weight: bold;
}
.hl.kwb {
color: #B05A65;
}
.hl.kwc {
color: #55aa55;
}
.hl.kwd {
color: #BC5A65;
font-weight: bold;
}
</style>
<title>Title</title>
</head>
<body>
<div class="chunk" id="unnamed-chunk-1"><div class="rcode"><div class="source"><pre class="knitr r"><span class="hl std">X919_data</span> <span class="hl kwb"><-</span> <span class="hl kwd">read_excel</span><span class="hl std">(</span><span class="hl str">"C:/Users/Diksha Bansal/Documents/GitHub/STAT 123/919report_data.xlsx"</span><span class="hl std">)</span>
</pre></div>
<div class="error"><pre class="knitr r">## Error in read_excel("C:/Users/Diksha Bansal/Documents/GitHub/STAT 123/919report_data.xlsx"): could not find function "read_excel"
</pre></div>
<div class="source"><pre class="knitr r"><span class="hl kwd">summary</span><span class="hl std">(X919_data)</span>
</pre></div>
<div class="error"><pre class="knitr r">## Error in summary(X919_data): object 'X919_data' not found
</pre></div>
</div></div>
<div class="chunk" id="unnamed-chunk-2"><div class="rcode"><div class="source"><pre class="knitr r"><span class="hl std">timing_cat</span> <span class="hl kwb"><-</span> <span class="hl kwd">c</span><span class="hl std">(</span><span class="hl str">"Dawn"</span><span class="hl std">,</span> <span class="hl str">"Morning"</span><span class="hl std">,</span> <span class="hl str">"Noon"</span><span class="hl std">,</span> <span class="hl str">"Afternoon"</span><span class="hl std">,</span> <span class="hl str">"Evening"</span><span class="hl std">,</span> <span class="hl str">"Night"</span><span class="hl std">)</span>
<span class="hl com"># Dawn -> 12:01 am to 4:00 am 0.00069444444444444 to 0.16666666666666667 </span>
<span class="hl com"># Morning -> 4:01 am to 8:00 am 0.16736111111111111 to 0.33333333333333333</span>
<span class="hl com"># Noon -> 8:01 am to 12:00 pm 0.33402777777777778 to 0.5</span>
<span class="hl com"># Afternoon -> 12:01 pm to 4:00 pm 0.50069444444444444 to 0.66666666666666667</span>
<span class="hl com"># Evening -> 4:01 pm to 8:00 pm 0.66736111111111111 to 0.83333333333333333</span>
<span class="hl com"># Night -> 8:01 pm to 12:00 am 0.83402777777777778 to 1</span>
</pre></div>
</div></div>
<div class="chunk" id="unnamed-chunk-3"><div class="rcode"><div class="source"><pre class="knitr r"><span class="hl std">time_vector</span> <span class="hl kwb"><-</span> <span class="hl std">X919_data</span><span class="hl opt">$</span><span class="hl std">Time</span>
</pre></div>
<div class="error"><pre class="knitr r">## Error in eval(expr, envir, enclos): object 'X919_data' not found
</pre></div>
<div class="source"><pre class="knitr r"><span class="hl std">len</span> <span class="hl kwb"><-</span> <span class="hl kwd">length</span><span class="hl std">(time_vector)</span>
</pre></div>
<div class="error"><pre class="knitr r">## Error in eval(expr, envir, enclos): object 'time_vector' not found
</pre></div>
<div class="source"><pre class="knitr r"><span class="hl std">char_time</span> <span class="hl kwb"><-</span> <span class="hl kwd">vector</span><span class="hl std">(</span><span class="hl kwc">mode</span> <span class="hl std">=</span> <span class="hl str">"character"</span><span class="hl std">,</span> <span class="hl kwc">length</span> <span class="hl std">= len)</span> <span class="hl com"># create an empty vector</span>
</pre></div>
<div class="error"><pre class="knitr r">## Error in vector(mode = "character", length = len): object 'len' not found
</pre></div>
<div class="source"><pre class="knitr r"><span class="hl kwa">for</span><span class="hl std">(i</span> <span class="hl kwa">in</span> <span class="hl num">1</span><span class="hl opt">:</span><span class="hl std">len){</span>
<span class="hl kwa">if</span><span class="hl std">(time_vector[i]</span> <span class="hl opt">></span> <span class="hl num">0</span> <span class="hl opt">&&</span> <span class="hl std">time_vector[i]</span> <span class="hl opt"><=</span> <span class="hl num">0.16666666666666667</span><span class="hl std">){</span>
<span class="hl std">char_time[i]</span> <span class="hl kwb">=</span> <span class="hl str">"Dawn"</span>
<span class="hl std">}</span> <span class="hl kwa">else if</span><span class="hl std">(time_vector[i]</span> <span class="hl opt">></span> <span class="hl num">0.16666666666666667</span> <span class="hl opt">&&</span> <span class="hl std">time_vector[i]</span> <span class="hl opt"><=</span> <span class="hl num">0.33333333333333333</span><span class="hl std">){</span>
<span class="hl std">char_time[i]</span> <span class="hl kwb">=</span> <span class="hl str">"Morning"</span>
<span class="hl std">}</span> <span class="hl kwa">else if</span><span class="hl std">(time_vector[i]</span> <span class="hl opt">></span> <span class="hl num">0.33333333333333333</span> <span class="hl opt">&&</span> <span class="hl std">time_vector[i]</span> <span class="hl opt"><=</span> <span class="hl num">0.5</span><span class="hl std">){</span>
<span class="hl std">char_time[i]</span> <span class="hl kwb">=</span> <span class="hl str">"Noon"</span>
<span class="hl std">}</span> <span class="hl kwa">else if</span><span class="hl std">(time_vector[i]</span> <span class="hl opt">></span> <span class="hl num">0.5</span> <span class="hl opt">&&</span> <span class="hl std">time_vector[i]</span> <span class="hl opt"><=</span> <span class="hl num">0.66666666666666667</span><span class="hl std">){</span>
<span class="hl std">char_time[i]</span> <span class="hl kwb">=</span> <span class="hl str">"Afternoon"</span>
<span class="hl std">}</span> <span class="hl kwa">else if</span><span class="hl std">(time_vector[i]</span> <span class="hl opt">></span> <span class="hl num">0.66666666666666667</span> <span class="hl opt">&&</span> <span class="hl std">time_vector[i]</span> <span class="hl opt"><=</span> <span class="hl num">0.83333333333333333</span><span class="hl std">){</span>
<span class="hl std">char_time[i]</span> <span class="hl kwb">=</span> <span class="hl str">"Evening"</span>
<span class="hl std">}</span> <span class="hl kwa">else</span><span class="hl std">{</span>
<span class="hl std">char_time[i]</span> <span class="hl kwb">=</span> <span class="hl str">"Night"</span>
<span class="hl std">}</span>
<span class="hl std">}</span>
</pre></div>
<div class="error"><pre class="knitr r">## Error in eval(expr, envir, enclos): object 'len' not found
</pre></div>
<div class="source"><pre class="knitr r"><span class="hl std">char_time</span>
</pre></div>
<div class="error"><pre class="knitr r">## Error in eval(expr, envir, enclos): object 'char_time' not found
</pre></div>
</div></div>
<div class="chunk" id="unnamed-chunk-4"><div class="rcode"><div class="source"><pre class="knitr r"><span class="hl std">timing_cat</span> <span class="hl kwb"><-</span> <span class="hl kwd">c</span><span class="hl std">(</span><span class="hl str">"Dawn"</span><span class="hl std">,</span> <span class="hl str">"Morning"</span><span class="hl std">,</span> <span class="hl str">"Noon"</span><span class="hl std">,</span> <span class="hl str">"Afternoon"</span><span class="hl std">,</span> <span class="hl str">"Evening"</span><span class="hl std">,</span> <span class="hl str">"Night"</span> <span class="hl std">)</span>
<span class="hl std">factor_time</span> <span class="hl kwb"><-</span> <span class="hl kwd">factor</span><span class="hl std">(char_time,</span> <span class="hl kwc">ordered</span> <span class="hl std">= T,</span> <span class="hl kwc">levels</span> <span class="hl std">= timing_cat)</span>
</pre></div>
<div class="error"><pre class="knitr r">## Error in factor(char_time, ordered = T, levels = timing_cat): object 'char_time' not found
</pre></div>
<div class="source"><pre class="knitr r"><span class="hl kwd">summary</span><span class="hl std">(factor_time)</span>
</pre></div>
<div class="error"><pre class="knitr r">## Error in summary(factor_time): object 'factor_time' not found
</pre></div>
</div></div>
<div class="chunk" id="unnamed-chunk-5"><div class="rcode"><div class="source"><pre class="knitr r"><span class="hl com">#Most of the incidents happen between noon and 8pm, so no, there are not more incidents happening at the end of the day</span>
</pre></div>
</div></div>
</body>
</html>