Impressive data collection!

However, it is really hard to compare the wear of my own clothes with these findings because of the fundamentally different approach to clothing.

Underwear shirts typically last between 20 and 25 times. That means an active shirt with about 28 wears is likely to be nearing the end of its lifecycle

What? I wear my shirts for years and I don’t have that many of them either. Sure, they get holes at some point but that isn’t a reason for me not to wear them. My point is, the wear expectancy is substantially different if one throws out clothes after 20 wears or if one keeps using them until they fall apart.

Not sure if OP is the author, but these R graphs are really bland. Looks like ggplot2, so why not use a package like ggthemes? Or at least remove the atrocious grey background (personal opinion)?