library(tidyverse) library(lubridate) # Aufgabe 1 currency_list = read_csv('https://raw.githubusercontent.com/NikoStein/dma_data/main/currency_list.csv') currency_prices = read_csv('https://raw.githubusercontent.com/NikoStein/dma_data/main/currency_price.csv') gpu_list = read_csv('https://raw.githubusercontent.com/NikoStein/dma_data/main/gpu_list.csv') gpu_prices = read_csv('https://raw.githubusercontent.com/NikoStein/dma_data/main/gpu_price.csv') # a) Stellen Sie die Preisentwicklung der gelisteten Grafikkarten in einem geeigneten Diagramm dar. # b) Berechnen Sie die Preisänderung der einzelnen Grafikkarten im Vergleich zum ersten Listing und # speichern Sie diese in einer neuen Variablen. # c) Offensichtlich unterliegen die Grafikkartenpreise teils großen Schwankungen. Berechnen Sie für jede # gelistete Grafikkarte geeignete Statistiken, um die Preisschwankungen zu aggregieren. # Welche Grafikkarte unterliegt den höchsten Schwankungen, welche den geringsten? # d) Stellen Sie im nächsten Schritt die Preisentwicklung der gelisteten Kryptowährungen in einem geeigneten # Diagramm dar. Berechnen und visualisieren Sie zusätzlich die prozentualen Preisänderungen. # e) Verbinden Sie die beiden Datensätze und vergleichen Sie die Preisentwicklung der Kryptowährungen mit # der Preisentwicklung der Grafikkarten. # Aufgabe 2 obesity = read_csv('https://raw.githubusercontent.com/NikoStein/dma_data/main/obesity.csv') # a) Zeigen Sie die weltweite Entwicklung von Adipositas im Zeitverlauf mittels einer geeigneten Grafik. # b) In wie vielen Ländern gibt es 2016 einen höheren Anteil an Adipositas als 1975, in wie vielen einen geringeren? # c) Vergleichen Sie die Entwicklung von Adipositas in den G7 Staaten # (Deutschland, Frankreich, Italien, Japan, Kanada, Vereinigtes Königreich, USA). g7_nations = c('Germany', 'France', 'Italy', 'Japan', 'Canada', 'United Kingdom of Great Britain and Northern Ireland', 'United States of America') #d) In wie vielen Ländern sind Frauen häufiger von Adipositas betroffen als Männer? # Wie hat sich die Verteilung über die Jahre verändert? # e) In welchen Ländern hat Adipositas verhältnismäßig am stärksten zugenommen? Wie erklären Sie sich die Ergebnisse?