library(gtsummary)
library(dplyr)
##UKDriverDeaths
data("UKDriverDeaths")
View(UKDriverDeaths)
summary(UKDriverDeaths)
Min. 1st Qu. Median Mean 3rd Qu. Max.
1057 1462 1631 1670 1851 2654
str(UKDriverDeaths)
Time-Series [1:192] from 1969 to 1985: 1687 1508 1507 1385 1632 ...
summary(UKDriverDeaths)
Min. 1st Qu. Median Mean 3rd Qu. Max.
1057 1462 1631 1670 1851 2654
str(UKDriverDeaths)
Time-Series [1:192] from 1969 to 1985: 1687 1508 1507 1385 1632 ...
plot(UKDriverDeaths)

Interpretation
Interpretation of the Distribution
Skewed Distribution: The fact that the mean (1670) is higher than the
median (1631) suggests the distribution is right-skewed. This means that
there are a small number of months with significantly high death counts,
pulling the mean above the median.
Range of Deaths: The deaths range from a minimum of 1057 to a maximum
of 2654, indicating a substantial variation in the number of deaths over
the periods being analyzed.
Interquartile Range (IQR): The interquartile range (IQR) is the
difference between the third quartile and the first quartile, i.e., 1851
- 1462 = 389. This tells us that the middle 50% of the data falls within
a range of 389 deaths. This is a relatively wide range, suggesting
moderate variability in the number of deaths.
Key Insights
The central 50% of the data (between the 1st and 3rd quartiles) spans
from 1462 to 1851 deaths.
The mean being higher than the median suggests that extreme values
(outliers with higher deaths) are influencing the dataset.
The maximum value of 2654 deaths is significantly higher than the 3rd
quartile, suggesting there could be months with unusually high death
counts.
Further Investigation
To better understand the cause of the skewness, it would be useful
to:
Visualize the data: A histogram or boxplot could reveal the
distribution shape more clearly and highlight any outliers.
Examine potential outliers: Investigate the months or periods with
extremely high death counts to understand why these extreme values
exist.
Check for seasonal patterns: If the data is monthly, certain months
might consistently report higher or lower deaths due to seasonal factors
(e.g., weather conditions, holidays, etc.).
LS0tDQp0aXRsZTogIlIgTm90ZWJvb2siDQpvdXRwdXQ6IGh0bWxfbm90ZWJvb2sNCi0tLQ0KYGBge3J9DQpsaWJyYXJ5KGd0c3VtbWFyeSkNCg0KbGlicmFyeShkcGx5cikNCmBgYA0KDQojI1VLRHJpdmVyRGVhdGhzDQoNCmBgYHtyfQ0KZGF0YSgiVUtEcml2ZXJEZWF0aHMiKQ0KVmlldyhVS0RyaXZlckRlYXRocykNCmBgYA0KDQpgYGB7cn0NCnN1bW1hcnkoVUtEcml2ZXJEZWF0aHMpDQpgYGANCg0KYGBge3J9DQpzdHIoVUtEcml2ZXJEZWF0aHMpDQpgYGANCg0KDQoNCg0KDQpgYGB7cn0NCnN1bW1hcnkoVUtEcml2ZXJEZWF0aHMpDQogICAgc3RyKFVLRHJpdmVyRGVhdGhzKQ0KICAgIHBsb3QoVUtEcml2ZXJEZWF0aHMpDQpgYGANCg0KDQpJbnRlcnByZXRhdGlvbg0KDQpJbnRlcnByZXRhdGlvbiBvZiB0aGUgRGlzdHJpYnV0aW9uDQoNClNrZXdlZCBEaXN0cmlidXRpb246IFRoZSBmYWN0IHRoYXQgdGhlIG1lYW4gKDE2NzApIGlzIGhpZ2hlciB0aGFuIHRoZSBtZWRpYW4gKDE2MzEpIHN1Z2dlc3RzIHRoZSBkaXN0cmlidXRpb24gaXMgcmlnaHQtc2tld2VkLiBUaGlzIG1lYW5zIHRoYXQgdGhlcmUgYXJlIGEgc21hbGwgbnVtYmVyIG9mIG1vbnRocyB3aXRoIHNpZ25pZmljYW50bHkgaGlnaCBkZWF0aCBjb3VudHMsIHB1bGxpbmcgdGhlIG1lYW4gYWJvdmUgdGhlIG1lZGlhbi4NCg0KUmFuZ2Ugb2YgRGVhdGhzOiBUaGUgZGVhdGhzIHJhbmdlIGZyb20gYSBtaW5pbXVtIG9mIDEwNTcgdG8gYSBtYXhpbXVtIG9mIDI2NTQsIGluZGljYXRpbmcgYSBzdWJzdGFudGlhbCB2YXJpYXRpb24gaW4gdGhlIG51bWJlciBvZiBkZWF0aHMgb3ZlciB0aGUgcGVyaW9kcyBiZWluZyBhbmFseXplZC4NCg0KSW50ZXJxdWFydGlsZSBSYW5nZSAoSVFSKTogVGhlIGludGVycXVhcnRpbGUgcmFuZ2UgKElRUikgaXMgdGhlIGRpZmZlcmVuY2UgYmV0d2VlbiB0aGUgdGhpcmQgcXVhcnRpbGUgYW5kIHRoZSBmaXJzdCBxdWFydGlsZSwgaS5lLiwgMTg1MSAtIDE0NjIgPSAzODkuIFRoaXMgdGVsbHMgdXMgdGhhdCB0aGUgbWlkZGxlIDUwJSBvZiB0aGUgZGF0YSBmYWxscyB3aXRoaW4gYSByYW5nZSBvZiAzODkgZGVhdGhzLiBUaGlzIGlzIGEgcmVsYXRpdmVseSB3aWRlIHJhbmdlLCBzdWdnZXN0aW5nIG1vZGVyYXRlIHZhcmlhYmlsaXR5IGluIHRoZSBudW1iZXIgb2YgZGVhdGhzLg0KDQpLZXkgSW5zaWdodHMNCg0KVGhlIGNlbnRyYWwgNTAlIG9mIHRoZSBkYXRhIChiZXR3ZWVuIHRoZSAxc3QgYW5kIDNyZCBxdWFydGlsZXMpIHNwYW5zIGZyb20gMTQ2MiB0byAxODUxIGRlYXRocy4NCg0KVGhlIG1lYW4gYmVpbmcgaGlnaGVyIHRoYW4gdGhlIG1lZGlhbiBzdWdnZXN0cyB0aGF0IGV4dHJlbWUgdmFsdWVzIChvdXRsaWVycyB3aXRoIGhpZ2hlciBkZWF0aHMpIGFyZSBpbmZsdWVuY2luZyB0aGUgZGF0YXNldC4NCg0KVGhlIG1heGltdW0gdmFsdWUgb2YgMjY1NCBkZWF0aHMgaXMgc2lnbmlmaWNhbnRseSBoaWdoZXIgdGhhbiB0aGUgM3JkIHF1YXJ0aWxlLCBzdWdnZXN0aW5nIHRoZXJlIGNvdWxkIGJlIG1vbnRocyB3aXRoIHVudXN1YWxseSBoaWdoIGRlYXRoIGNvdW50cy4NCg0KRnVydGhlciBJbnZlc3RpZ2F0aW9uDQoNClRvIGJldHRlciB1bmRlcnN0YW5kIHRoZSBjYXVzZSBvZiB0aGUgc2tld25lc3MsIGl0IHdvdWxkIGJlIHVzZWZ1bCB0bzoNCg0KVmlzdWFsaXplIHRoZSBkYXRhOiBBIGhpc3RvZ3JhbSBvciBib3hwbG90IGNvdWxkIHJldmVhbCB0aGUgZGlzdHJpYnV0aW9uIHNoYXBlIG1vcmUgY2xlYXJseSBhbmQgaGlnaGxpZ2h0IGFueSBvdXRsaWVycy4NCg0KRXhhbWluZSBwb3RlbnRpYWwgb3V0bGllcnM6IEludmVzdGlnYXRlIHRoZSBtb250aHMgb3IgcGVyaW9kcyB3aXRoIGV4dHJlbWVseSBoaWdoIGRlYXRoIGNvdW50cyB0byB1bmRlcnN0YW5kIHdoeSB0aGVzZSBleHRyZW1lIHZhbHVlcyBleGlzdC4NCg0KQ2hlY2sgZm9yIHNlYXNvbmFsIHBhdHRlcm5zOiBJZiB0aGUgZGF0YSBpcyBtb250aGx5LCBjZXJ0YWluIG1vbnRocyBtaWdodCBjb25zaXN0ZW50bHkgcmVwb3J0IGhpZ2hlciBvciBsb3dlciBkZWF0aHMgZHVlIHRvIHNlYXNvbmFsIGZhY3RvcnMgKGUuZy4sIHdlYXRoZXIgY29uZGl0aW9ucywgaG9saWRheXMsIGV0Yy4pLg0KDQoNCg==