L3

#L3.1 # We are going to find and compare the 13-week treasury bill rates at the end of the school termm and compare to the beginning of the school term.

library(quantmod)
getSymbols("TB3MS", src = "FRED")

These are the monthly published 3-month treasury bill secondary market rates

We will first find the monthly average for the end of term at September 2024.

EoT_Rate <- TB3MS["2024-09-1"]
print(EoT_Rate)

We will now find the monthly average monthly rate at the beginning of the school term at May 2024.

BoT_Rate <- TB3MS["2024-05-1"]
print(BoT_Rate)

#Comparing the rates we see that at the end of the school term, the interest rate is 0.53 percentage points lower than the beginning of the school term.

#L3.2 # Interest rates change over time for a number of reasons: # Firstly, the federal reserve set benchmark interest rates. This is to control inflation and to influence economic activity, with lower rates encouraging economic participation, and higher rates attempting to control inflation and slow down the economy. # With respect to inflation. Higher inflation causes money to lose purchasing power, so lenders demand higher interest rates to offset the cost. # Another reason can be global crises or economic uncertainty. Shocks to the economy or uncertainty about the future can drop interest rates as investors flock to safe assets such as treasury bills. # Relating to the treasury bill rates. Treasury bill short term rates are often closely linked to interest rates as their demand is determined by investor sentiment about the market.

LS0tCnRpdGxlOiAiUiBOb3RlYm9vayIKb3V0cHV0OiBodG1sX25vdGVib29rCi0tLQoKIyBMMwoKI0wzLjEKIyBXZSBhcmUgZ29pbmcgdG8gZmluZCBhbmQgY29tcGFyZSB0aGUgMTMtd2VlayB0cmVhc3VyeSBiaWxsIHJhdGVzIGF0IHRoZSBlbmQgb2YgdGhlIHNjaG9vbCB0ZXJtbSBhbmQgY29tcGFyZSB0byB0aGUgYmVnaW5uaW5nIG9mIHRoZSBzY2hvb2wgdGVybS4KYGBge3J9CmxpYnJhcnkocXVhbnRtb2QpCmdldFN5bWJvbHMoIlRCM01TIiwgc3JjID0gIkZSRUQiKQpgYGAKIyBUaGVzZSBhcmUgdGhlIG1vbnRobHkgcHVibGlzaGVkIDMtbW9udGggdHJlYXN1cnkgYmlsbCBzZWNvbmRhcnkgbWFya2V0IHJhdGVzCiMgV2Ugd2lsbCBmaXJzdCBmaW5kIHRoZSBtb250aGx5IGF2ZXJhZ2UgZm9yIHRoZSBlbmQgb2YgdGVybSBhdCBTZXB0ZW1iZXIgMjAyNC4KYGBge3J9CkVvVF9SYXRlIDwtIFRCM01TWyIyMDI0LTA5LTEiXQpwcmludChFb1RfUmF0ZSkKYGBgCiMgV2Ugd2lsbCBub3cgZmluZCB0aGUgbW9udGhseSBhdmVyYWdlIG1vbnRobHkgcmF0ZSBhdCB0aGUgYmVnaW5uaW5nIG9mIHRoZSBzY2hvb2wgdGVybSBhdCBNYXkgMjAyNC4KYGBge3J9CkJvVF9SYXRlIDwtIFRCM01TWyIyMDI0LTA1LTEiXQpwcmludChCb1RfUmF0ZSkKYGBgCiNDb21wYXJpbmcgdGhlIHJhdGVzIHdlIHNlZSB0aGF0IGF0IHRoZSBlbmQgb2YgdGhlIHNjaG9vbCB0ZXJtLCB0aGUgaW50ZXJlc3QgcmF0ZSBpcyAwLjUzIHBlcmNlbnRhZ2UgcG9pbnRzIGxvd2VyIHRoYW4gdGhlIGJlZ2lubmluZyBvZiB0aGUgc2Nob29sIHRlcm0uCgojTDMuMgojIEludGVyZXN0IHJhdGVzIGNoYW5nZSBvdmVyIHRpbWUgZm9yIGEgbnVtYmVyIG9mIHJlYXNvbnM6CiMgRmlyc3RseSwgdGhlIGZlZGVyYWwgcmVzZXJ2ZSBzZXQgYmVuY2htYXJrIGludGVyZXN0IHJhdGVzLiBUaGlzIGlzIHRvIGNvbnRyb2wgaW5mbGF0aW9uIGFuZCB0byBpbmZsdWVuY2UgZWNvbm9taWMgYWN0aXZpdHksIHdpdGggbG93ZXIgcmF0ZXMgZW5jb3VyYWdpbmcgZWNvbm9taWMgcGFydGljaXBhdGlvbiwgYW5kIGhpZ2hlciByYXRlcyBhdHRlbXB0aW5nIHRvIGNvbnRyb2wgaW5mbGF0aW9uIGFuZCBzbG93IGRvd24gdGhlIGVjb25vbXkuCiMgV2l0aCByZXNwZWN0IHRvIGluZmxhdGlvbi4gSGlnaGVyIGluZmxhdGlvbiBjYXVzZXMgbW9uZXkgdG8gbG9zZSBwdXJjaGFzaW5nIHBvd2VyLCBzbyBsZW5kZXJzIGRlbWFuZCBoaWdoZXIgaW50ZXJlc3QgcmF0ZXMgdG8gb2Zmc2V0IHRoZSBjb3N0LiAKIyBBbm90aGVyIHJlYXNvbiBjYW4gYmUgZ2xvYmFsIGNyaXNlcyBvciBlY29ub21pYyB1bmNlcnRhaW50eS4gU2hvY2tzIHRvIHRoZSBlY29ub215IG9yIHVuY2VydGFpbnR5IGFib3V0IHRoZSBmdXR1cmUgY2FuIGRyb3AgaW50ZXJlc3QgcmF0ZXMgYXMgaW52ZXN0b3JzIGZsb2NrIHRvIHNhZmUgYXNzZXRzIHN1Y2ggYXMgdHJlYXN1cnkgYmlsbHMuCiMgUmVsYXRpbmcgdG8gdGhlIHRyZWFzdXJ5IGJpbGwgcmF0ZXMuIFRyZWFzdXJ5IGJpbGwgc2hvcnQgdGVybSByYXRlcyBhcmUgb2Z0ZW4gY2xvc2VseSBsaW5rZWQgdG8gaW50ZXJlc3QgcmF0ZXMgYXMgdGhlaXIgZGVtYW5kIGlzIGRldGVybWluZWQgYnkgaW52ZXN0b3Igc2VudGltZW50IGFib3V0IHRoZSBtYXJrZXQu