Dopiero się uczę R.
Mam takie polecania i nie mam pomysł jak mogłambym przepisać na język R.
Wczytać dane Cars93 z biblioteki MASS.
1.Podaj wymiar tej ramki danych.
2.Sprawdź, czy ta ramka zawiera braki w danych.Jeśli zawiera braki, to podaj ich liczbę.Wyświetl indeksy rekordów zawierających braki.
3.Wyświetl nazwy wszystkich kolumn
4.Jakiego typu zmienną jest AirBags?Jaki odsetek samochodów nie miał poduszek powietrznych?
5.Wyświetl indeksy 3 samochodów o najniższej cenie:Price.Jakiej marki poduszek powietrznych?
6.Wyświetlić wszystkie informacje z bazy dotyczące producenta samochodów marki Ford z manualną skrzynią biegów i posortować je według ceny maksymalnej: Max.Price.
7.Wyświetlić wszystkie unikalne poziomy zmiennej Type. Następnie zmienić te nazwy na odpowiadające polskie nazwy. Wykonaj wykres słupkowy dla tej zmiennej Type i napisz krótko wnioski.
8.Wyznacz i skomentuj średnią oraz medianę ceny samochodów marki Mazda.Sprawdź, ile było samochodów tej marki w cenie poniżej 17 tys.$.Wyświetlić wszystkie informacje dotyczące tych samochodów.
9.Wyświetl indeksy samochodów, których długość: Length jest liczbą parzystą.
10.Dopisz do ramki danych zmienną Price_factor powstałą w wyniku podziału atrybutu Price na 3 klasy:poniżej 12 tys $,cena pomiędzy 12 a 21 tys.$,powyżej 21 tys. $.Następnie podaj ile samochodów było w cenie powyżej 21. tys.$.
#Zad 1
library(MASS)
data <- data.frame(Cars93)
data
#1
length(data)
dim(data)
attributes(data)
#2
names(data)
is.na(data)
#3
Cars93[0,]
#4
AirBag <- data$AirBags
class(AirBag)
levels(AirBag)
#5
sort(data$Price)
tail(sort(data$Price),n=3)
#6
(data$Model=c("Ford"))&(data$Man.trans.avail=c("Yes"))
sort.list(data$Max.Price,data,decreasing = FALSE,na.last = TRUE)
#7
type <- c('ą','ć','ę','ś')
#8
mean(data$Manufacturer==c('Mazda'))
Mazda<- (data$Manufacturer==c('Mazda'))<(data$Price==17000)
summary(Mazda)
#9
długosc<- length(data$Model)
długosc %% 2
#10
data$Price_factor <- c(12<data$Price)&c(data$Price>21)
data$Price_factor