Skip to content

Instantly share code, notes, and snippets.

@hagino3000

hagino3000/gist:5482052

Last active December 16, 2015 19:00
Show Gist options
  • Save hagino3000/5482052 to your computer and use it in GitHub Desktop.
Save hagino3000/5482052 to your computer and use it in GitHub Desktop.
Download ZIP
Summary of aggregated data.
Raw
gistfile1.txt
> scores <- read.delim('./alldate_scale1.csv', sep = ',', header = TRUE)
> summary(scores)
value.loc.lat value.loc.lon value.score value.low
Min. :20.0 Min. :120.0 Min. :0.0844 Min. :0.0000
1st Qu.:27.5 1st Qu.:127.5 1st Qu.:0.2466 1st Qu.:0.0000
Median :35.0 Median :135.0 Median :0.3043 Median :0.0000
Mean :35.0 Mean :135.0 Mean :0.3054 Mean :0.7569
3rd Qu.:42.5 3rd Qu.:142.5 3rd Qu.:0.3612 3rd Qu.:1.8016
Max. :50.0 Max. :150.0 Max. :0.5777 Max. :3.0000
value.totalScore value.totalLow value.count
Min. : 32.0 Min. : 0.0 Min. :218.0
1st Qu.:214.0 1st Qu.: 0.0 1st Qu.:862.0
Median :265.0 Median : 0.0 Median :879.0
Mean :267.1 Mean : 665.6 Mean :874.6
3rd Qu.:317.0 3rd Qu.:1344.0 3rd Qu.:897.0
Max. :512.0 Max. :2970.0 Max. :993.0
> head(scores)
value.loc.lat value.loc.lon value.score value.low value.totalScore
1 20.1 120.0 0.2380 0 99
2 20.1 120.1 0.2398 0 211
3 20.1 120.2 0.2216 0 205
4 20.1 120.3 0.2525 0 225
5 20.1 120.4 0.2399 0 220
6 20.1 120.5 0.2373 0 211
value.totalLow value.count
1 0 416
2 0 880
3 0 925
4 0 891
5 0 917
6 0 889
>
> tail(scores)
value.loc.lat value.loc.lon value.score value.low value.totalScore
90596 50 149.5 0.1374 0 65
90597 50 149.6 0.1479 0 63
90598 50 149.7 0.1632 0 71
90599 50 149.8 0.1370 0 64
90600 50 149.9 0.1609 0 70
90601 50 150.0 0.1468 0 32
value.totalLow value.count
90596 0 473
90597 0 426
90598 0 435
90599 0 467
90600 0 435
90601 0 218
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment