Özet - Veri İş Akışı

Coddy'nin R Journey'sinin Mantık ve Akış bölümünün bir parçası. Ders 36 / 64.

Görev

Zor

sales_report(records) işlevini tamamla. Her kayıt item:quantity:price biçimindedir. Raporu üç aşamada oluştur:

Kayıtları lapply() ile bir listeye ayrıştır.
Miktarı 0'dan büyük olan kayıtları Filter() ile tut.
Tutulan her satırın toplamını (miktar çarpı fiyat) sapply() ile, genel toplamı ise Reduce() ile hesapla.

Tutulan her kayıt için bir satır ( tea: 8.00), ardından genel toplamla birlikte Total: ve miktarı 0 olan kayıtların sayısıyla birlikte Skipped: döndür. Para değerlerini iki ondalık basamakla göster.

Sağlanan kod, kayıtları virgülle ayrılmış bir satır olarak okur ve döndürülen her satırı yazdırır.

Kendin dene

sales_report <- function(records) {
  # Kodunuzu buraya yazın
  character(0)
}

# Sağlanan girdi/çıktı kodu: olduğu gibi bırakın
input <- suppressWarnings(readLines(file("stdin")))
cat(sales_report(strsplit(input[1], ",")[[1]]), sep = "\n")