Funktioniert das R-ichtig? (2)
Eine mögliche Implementierung der Funktion interpret() ist schon für dich bereitgestellt. In dieser Übung schreibst du eine weitere Funktion, die mithilfe von interpret() alle Daten aus einem Vektor mit deinen täglichen Profilaufrufen interpretiert. Außerdem gibt diese Funktion bei Bedarf die Summe der Profilaufrufe an betriebsamen Tagen zurück. Eine for-Schleife ist ideal, um über alle Vektorelemente zu iterieren. Die Rückgabe der Summe aller Profilaufrufe an bestimmten Tagen kannst du über ein Funktionsargument mit einem Standardwert programmieren.
Diese Übung ist Teil des Kurses
R für Fortgeschrittene
Anleitung zur Übung
Vervollständige die Vorlage für die Funktion interpret_all():
return_sumsoll ein optionales Argument mit dem StandardwertTRUEsein.Iteriere innerhalb der
for-Schleife überviewsund addiere bei jeder Iteration das Ergebnis voninterpret(v)zucount. Denke daran, dassinterpret(v)an betriebsamen Tagenvund ansonsten0zurückgibt. Zudem liefertinterpret(v)einige Textausgaben.Vervollständige das
if-Konstrukt:Wird
return_sumalsTRUEausgewertet, wirdcountzurückgegeben.Andernfalls wird
NULLzurückgegeben.
Rufe diese neu definierte Funktion sowohl mit linkedin als auch mit facebook auf.
Interaktive Übung
Vervollständige den Beispielcode, um diese Übung erfolgreich abzuschließen.
# The linkedin and facebook vectors have already been created for you
linkedin <- c(16, 9, 13, 5, 2, 17, 14)
facebook <- c(17, 7, 5, 16, 8, 13, 14)
# The interpret() can be used inside interpret_all()
interpret <- function(num_views) {
if (num_views > 15) {
print("You're popular!")
return(num_views)
} else {
print("Try to be more visible!")
return(0)
}
}
# Define the interpret_all() function
# views: vector with data to interpret
# return_sum: return total number of views on popular days?
interpret_all <- function(views, return_sum) {
count <- 0
for (v in views) {
}
if (return_sum) {
} else {
}
}
# Call the interpret_all() function on both linkedin and facebook