Skip to content

Commit

Permalink
Update transaction.html
Browse files Browse the repository at this point in the history
  • Loading branch information
ndleah committed Jan 24, 2022
1 parent b8000b7 commit 6de6083
Showing 1 changed file with 11 additions and 13 deletions.
24 changes: 11 additions & 13 deletions transaction.html
Original file line number Diff line number Diff line change
Expand Up @@ -11,7 +11,7 @@

<meta name="author" content="Leah Nguyen" />

<meta name="date" content="2022-01-22" />
<meta name="date" content="2022-01-24" />

<title>MLR on Time-Series Financial Dataset</title>

Expand Down Expand Up @@ -259,7 +259,7 @@

<h1 class="title toc-ignore">MLR on Time-Series Financial Dataset</h1>
<h4 class="author">Leah Nguyen</h4>
<h4 class="date">2022-01-22</h4>
<h4 class="date">2022-01-24</h4>

</div>

Expand Down Expand Up @@ -870,7 +870,7 @@ <h1 number="5"><span class="header-section-number">5</span> Train-Test split</h1
<p>I will generate an additional data set that filtered only Industry 1 and Location 1 records. The train and split test for the Advanced Model Fitting section can be kept the same as there are no further adjustments needed.</p>
<pre class="r"><code># create new df filter by only Location 1 &amp; Industry 1
agg_1_1 &lt;- aggregated_transactions %&gt;%
filter( industry == 1, location == 1)
filter(industry == 1, location == 1)

# # Create train and test
# use the adjusted data set with new features
Expand Down Expand Up @@ -1160,17 +1160,15 @@ <h2 number="6.2"><span class="header-section-number">6.2</span> Advanced Model F
<li>Consolidate all data into a dataframe.<br />
</li>
</ol>
<pre class="r"><code># mlr_all &lt;- lm(monthly_amount ~ date + month_number, data = train_set)
<pre class="r"><code># industries &lt;- sort(unique(aggregated_transactions$industry))
# locations &lt;- sort(unique(aggregated_transactions$location))
#
# # Predictions vs Test data
# evaluation_metrics_test_1_1 &lt;- data.frame(
# X = &quot;Predictions vs Test data&quot;,
# R2 = rsquare(mlr_all, data = test_set),
# RMSE = rmse(mlr_all, data = test_set),
# MAE = mae(mlr_all, data = test_set)
# )
#
# rmarkdown::paged_table(evaluation_metrics_test_1_1)</code></pre>
# for ind in industries{
# for loc in locations{
# temp = aggregated_transactions[aggregated_transactions$industry=ind &amp; aggregated_transactions$location=loc,]
#
# }
# }</code></pre>
</div>
</div>
<div id="evaluation" class="section level1" number="7">
Expand Down

0 comments on commit 6de6083

Please sign in to comment.