-
Notifications
You must be signed in to change notification settings - Fork 0
/
olmayangrafikjulia
49 lines (33 loc) · 1.14 KB
/
olmayangrafikjulia
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
### NY'deki en popüler 10 köpek ırkını bar chart ile göstermeye çalışıyorum
using Pkg
Pkg.add("Distributions")
Pkg.add("StatsBase")
Pkg.add("CSV")
Pkg.add("DataFrames")
Pkg.add("StatsBase")
using CSV
using DataFrames
### dataset burada https://catalog.data.gov/dataset/nyc-dog-licensing-dataset
### dosya uzantısı download klasörü olacak
NYDogs = CSV.read("/Users/-------/Downloads/NYC_Dog_Licensing_Dataset.csv", DataFrame)
### ırkı unknown olanları çıkardım
DogsNY = NYDogs[(NYDogs.BreedName .!= "Unknown"), :]
### boşluk olan satırlar gitti
NYDF = DogsNY[:, ["AnimalName", "AnimalGender", "BreedName", "AnimalBirthYear"]]
DogsNYF = dropmissing(NYDF)
### kaçar tane var her ırktan baktım
using StatsBase
countmap(DogsNYF."BreedName")
### dataframe'e attım
DogsNameCount = countmap(DogsNYF."BreedName")
ENV["LINES"]=200
### toplam sayıları
DogBreeds = combine(groupby(DogsNYF, :BreedName), nrow)
### büyükten küçüğe sıralama
DogBreeds2 = sort(DogBreeds, "nrow", rev = true)
### en fazla olan 10 ırk
D10 = first(DogBreeds2, 10)
#### İŞTE BURASI OLMADI ÇİZEMİYORUM
x= D10[!, :BreedName]
y = D10[!, :nrow]
bar(x,y)