├── scix.png ├── Screenshots ├── files.png ├── addFiles.png ├── code snip.png ├── dataicon.png ├── df_data_1.png ├── df_data_2.png ├── df_data_3.png ├── notebook.png ├── sparkSetup.png ├── added files.png ├── environment.png ├── insertCDDHDD.gif ├── new notebook.png ├── loadBlocPower_T.gif ├── shiny document.png ├── uploaded data.png ├── addingcredentials.png ├── objectStoreSetup.png ├── ManageObjectStorage.png ├── insertHDD_Features.gif └── Screen Shot 2016-12-22 at 1.01.56 PM.png ├── blocpowertransp.png ├── data ├── HDD-Features.csv ├── BlocPower_T.csv ├── CDD-HDD-Features.csv └── clusterEnergyLocation.csv ├── R └── script.r ├── README.md └── shinyDemo.Rmd /scix.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/HEAD/scix.png -------------------------------------------------------------------------------- /Screenshots/files.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/HEAD/Screenshots/files.png -------------------------------------------------------------------------------- /blocpowertransp.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/HEAD/blocpowertransp.png -------------------------------------------------------------------------------- /Screenshots/addFiles.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/HEAD/Screenshots/addFiles.png -------------------------------------------------------------------------------- /Screenshots/code snip.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/HEAD/Screenshots/code snip.png -------------------------------------------------------------------------------- /Screenshots/dataicon.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/HEAD/Screenshots/dataicon.png -------------------------------------------------------------------------------- /Screenshots/df_data_1.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/HEAD/Screenshots/df_data_1.png -------------------------------------------------------------------------------- /Screenshots/df_data_2.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/HEAD/Screenshots/df_data_2.png -------------------------------------------------------------------------------- /Screenshots/df_data_3.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/HEAD/Screenshots/df_data_3.png -------------------------------------------------------------------------------- /Screenshots/notebook.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/HEAD/Screenshots/notebook.png -------------------------------------------------------------------------------- /Screenshots/sparkSetup.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/HEAD/Screenshots/sparkSetup.png -------------------------------------------------------------------------------- /Screenshots/added files.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/HEAD/Screenshots/added files.png -------------------------------------------------------------------------------- /Screenshots/environment.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/HEAD/Screenshots/environment.png -------------------------------------------------------------------------------- /Screenshots/insertCDDHDD.gif: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/HEAD/Screenshots/insertCDDHDD.gif -------------------------------------------------------------------------------- /Screenshots/new notebook.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/HEAD/Screenshots/new notebook.png -------------------------------------------------------------------------------- /Screenshots/loadBlocPower_T.gif: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/HEAD/Screenshots/loadBlocPower_T.gif -------------------------------------------------------------------------------- /Screenshots/shiny document.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/HEAD/Screenshots/shiny document.png -------------------------------------------------------------------------------- /Screenshots/uploaded data.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/HEAD/Screenshots/uploaded data.png -------------------------------------------------------------------------------- /Screenshots/addingcredentials.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/HEAD/Screenshots/addingcredentials.png -------------------------------------------------------------------------------- /Screenshots/objectStoreSetup.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/HEAD/Screenshots/objectStoreSetup.png -------------------------------------------------------------------------------- /Screenshots/ManageObjectStorage.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/HEAD/Screenshots/ManageObjectStorage.png -------------------------------------------------------------------------------- /Screenshots/insertHDD_Features.gif: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/HEAD/Screenshots/insertHDD_Features.gif -------------------------------------------------------------------------------- /Screenshots/Screen Shot 2016-12-22 at 1.01.56 PM.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/HEAD/Screenshots/Screen Shot 2016-12-22 at 1.01.56 PM.png -------------------------------------------------------------------------------- /data/HDD-Features.csv: -------------------------------------------------------------------------------- 1 | domestic_gas,heating_gas 0.096226455,0.366193236 0.322599638,0.57959223 0.032705972,0.036460695 0.02750427,0.23466382 0.322599638,0.57959223 3.813677406,0.673378309 0.029156422,0.560720947 0.029156422,0.560720947 0.074841027,1.352528204 0.357803094,0.210292496 0.042588743,0.639048418 0.322599638,0.57959223 0.048815539,0.636409562 0.032833511,0.719650745 0.017726724,0.007526078 0.322599638,0.57959223 0.101437594,0.621744224 0.066364847,0.057102961 0.17700395,0.156157661 0.079863788,0.021132007 0.254538007,0.029613568 0.322599638,0.57959223 0.025937254,0.25087818 0.001729906,1.125770094 0.322599638,0.57959223 0.322599638,0.57959223 0.134225048,0.716831461 0.063112266,0.950962289 0.11639834,0.439075233 0.322599638,0.57959223 0.096477999,0.364042333 0.322599638,0.57959223 0.322599638,0.57959223 0.060403409,0.651957702 0.08527751,1.887574809 0.039499521,0.021089902 0.05843415,1.202789658 0.021255609,0.375766709 0.185843516,1.695685383 0.322599638,0.57959223 0.080937437,0.018951518 0.097451801,0.563577816 0.322599638,0.57959223 0.322599638,0.57959223 0.188581935,0.471708481 0.104703939,0.218353557 0.017235803,0.771170755 0.12721259,0.475792656 0.322599638,0.57959223 0.130748977,0.562104934 0.226912528,0.692196232 0.178244823,0.288464788 0.166664921,0.827056103 0.028730894,0.202395508 0.786570671,0.700616647 0.137837436,0.040228192 0.00949314,0.63894436 0.238984204,0.041268058 0.829357852,1.750591387 0.0757172,1.072885523 0.101114142,0.719890853 0.322599638,0.57959223 0.207653904,0.62961649 0.322599638,0.57959223 0.322599638,0.57959223 0.072450134,0.409307863 0.041072483,0.264007758 0.629953778,0.641888508 0.322599638,0.57959223 0.064366715,2.997384437 0.322599638,0.57959223 0.011178147,0.745507841 0.035786022,0.11972482 0.75567522,0.806243585 0.072817375,0.263627561 0.322599638,0.57959223 0.622908318,0.904659735 0.123185352,1.678320175 0.628839944,0.881580028 0.020324756,0.729646517 0.322599638,0.57959223 0.034741191,0.744458809 4.04714962,0.691344698 0.014669148,0.171185639 4.226072264,0.325951824 0.20363922,0.465249447 2.767528115,1.341849228 1.144460385,0.428884904 0.322599638,0.57959223 0.360459895,1.007950087 0.068733356,0.277840437 0.135057442,0.705468567 0.270921306,1.772506827 0.018924078,0.110041817 0.047476906,0.327414462 0.047476906,0.327414462 0.181762591,0.443632916 0.014205602,0.002102632 0.322599638,0.57959223 0.17626613,0.209263683 0.018650987,0.02764164 0.322599638,0.57959223 0.097964685,0.441250375 -------------------------------------------------------------------------------- /data/BlocPower_T.csv: -------------------------------------------------------------------------------- 1 | UTSUM_Electricity_Usage,INFO_Year of Construction,INFO_Number of Stories,INFO_Total Square Feet,PLEI_1_Quantity,PLEI_3_Quantity 2 | "117,870 kWh",1955,4,"14,600",1,2 3 | "16,207 kWh",1940,1,600,1, 4 | "15,564 kWh",1920,2,"6,000",2,1 5 | "25,851 kWh",1965,1,"5,000",6,1 6 | "32,343 kWh",1930,3,"4,196",1,1 7 | "106,938 kWh",1910,1,"2,200",2,1 8 | "228,985 kWh",1964,2,"26,318",18,7 9 | "228,985 kWh",1964,2,"26,318",18,7 10 | "380,400 kWh",1931,4,"65,000",2,27 11 | "4,510 kWh",1910,3,"3,024",2,1 12 | "10,722 kWh",1897,2,"3,800",4,1 13 | ,1931,2,"2,400",2,1 14 | "6,365 kWh",1931,1,"3,128",4,1 15 | "15,130 kWh",1931,1,"5,700",1,2 16 | "51,172 kWh",1960,2,"15,000",2,1 17 | "2,213 kWh",1960,2,"3,500",1, 18 | "21,583 kWh",1931,2,"2,200",1,1 19 | "14,232 kWh",1870,2,"6,022",2,7 20 | "18,774 kWh",1965,2,"10,300",1,1 21 | "12,663 kWh",1934,2,"2,178",1,1 22 | "12,651 kWh",1934,2,"1,304",7,5 23 | "7,769 kWh",1900,2,"1,100",2,2 24 | "3,144 kWh",2006,1,"3,371",4,1 25 | "41,130 kWh",1931,2,"4,800",1,1 26 | "11,861 kWh",1931,1,"2,000",2,1 27 | "15,145 kWh",1921,1,"5,300",1,1 28 | "38,471 kWh",1900,4,"10,209",6,2 29 | "34,740 kWh",1990,2,"5,400",3,1 30 | "9,525 kWh",1950,2,"17,872",4,2 31 | "7,911 kWh",1940,2,"2,700",1,1 32 | "69,695 kWh",1950,3,"17,651",6,9 33 | "4,670 kWh",1930,2,"2,400",4,1 34 | "6,499 kWh",1920,2,"9,000",2,7 35 | "11,243 kWh",1930,2,"7,200",2,6 36 | "132,940 kWh",unknown,2,"10,418",4,2 37 | "79,360 kWh",,2,"22,637",1,1 38 | "44,874 kWh",1890,3,"8,300",15,4 39 | "49,960 kWh",1900,2,"3,420",4,1 40 | "25,632 kWh",1899,2,"2,800",2,1 41 | "6,732 kWh",1920,2,"2,141",1,2 42 | "13,607 kWh",1886,2,"3,854",1,1 43 | "5,712 kWh",-,3,"3,000",3,1 44 | "8,532 kWh",,2,"1,520",1,3 45 | 636 kWh,Unknown,3,"2,400",1,1 46 | "29,196 kWh",1920,4,"9,729",2,1 47 | "15,840 kWh",1930,2,"2,500",2,4 48 | "14,638 kWh",1929,2,"2,480",3,1 49 | "6,134 kWh",1910,2,"2,880",1, 50 | "14,688 kWh",,1,"1,250",9,7 51 | "57,400 kWh",1950,2,"12,000",3,1 52 | "9,801 kWh",1910,2,"1,980",1,1 53 | "156,080 kWh",1910,3,"7,847",3,2 54 | "12,021 kWh",1950,1,"7,300",3,2 55 | "58,081 kWh",1920,3,"6,656",1,2 56 | "180,840 kWh",1910,4,"4,555",22,9 57 | "31,880 kWh",1847,2,"9,280",1,2 58 | "5,945 kWh",,2,"4,032",5,1 59 | "46,231 kWh",1847,2,"12,500",3,4 60 | "170,240 kWh",1931,4,"6,304",8,14 61 | "84,231 kWh",1961,3,"9,014",6,2 62 | "7,990 kWh",1931,3,"1,782",1,2 63 | "7,992 kWh",1931,1,700,2,2 64 | "3,545 kWh",1890,2,"3,600",, 65 | "4,283 kWh",1931,1,650,1,2 66 | "4,752 kWh",1910,1,"1,920",1,1 67 | "37,760 kWh",1965,1,"10,989",6,3 68 | "34,110 kWh",1946,4,"25,505",9,9 69 | "4,533 kWh",1926,4,"4,095",1,1 70 | ,1900,4,"9,744",1,1 71 | "21,930 kWh",1935,2,"2,170",1,13 72 | "205,336 kWh",1910,4,"22,911",1,7 73 | "5,400 kWh",1914,2,"7,038",1,2 74 | "61,983 kWh",1942,2,"10,000",8,1 75 | "30,616 kWh",1931,1,"2,000",2,1 76 | "97,200 kWh",1910,3,"7,500",2,1 77 | "29,849 kWh",1971,1,"3,500",13, 78 | "14,650 kWh",1950,1,800,, 79 | "17,291 kWh",1950,1,"1,500",, 80 | "15,392 kWh",1940,1,"2,000",8,1 81 | "16,088 kWh",1965,1,"7,826",, 82 | "33,778 kWh",1900,1,900,, 83 | ,2006,3,"5,000",2,1 84 | "22,770 kWh",1931,1,"1,800",1,ModelNumber 85 | "28,020 kWh",1931,3,"9,600",2,3 86 | "92,932 kWh",2004,1,"1,500",1,2 87 | "6,042 kWh",1950,1,"1,000",, 88 | "54,860 kWh",1929,2,800,1, 89 | "55,500 kWh",1929,2,"1,000",1, 90 | "4,007 kWh",1929,2,600,1, 91 | "97,587 kWh",2013,2,"6,000",, 92 | "9,740 kWh",1926,2,"4,592",1,1 93 | "74,760 kWh",1930,2,"8,172",21,1 94 | "23,643 kWh",1931,2,"3,075",1,4 95 | ,1928,3,"18,000",3,1 96 | "4,757 kWh",1917,4,"5,248",1,2 97 | "4,757 kWh",1917,4,"5,248",1,2 98 | "12,636 kWh",1925,3,"5,416",1,1 99 | "34,372 kWh",1965,1,"8,900",, 100 | ,1908,2,900,2,1 101 | "186,302 kWh",1930,4,"15,914",40,3 102 | "16,417 kWh",1930,3,"5,141",7,3 103 | "50,604 kWh",1922,1,800,3,2 104 | "6,962 kWh",1910,4,"6,095",3,1 105 | -------------------------------------------------------------------------------- /R/script.r: -------------------------------------------------------------------------------- 1 | ####Install Packages - this function checks if a package is installed and if not installs it 2 | packages <- function(x){ 3 | x <- as.character(match.call()[[2]]) 4 | if (!require(x,character.only=TRUE)){ 5 | install.packages(pkgs=x,repos="http://cran.r-project.org") 6 | require(x,character.only=TRUE) 7 | } 8 | } 9 | packages(dplyr) 10 | packages(rgdal) 11 | packages(sp) 12 | packages(maptools) 13 | packages(leaflet) 14 | packages(ggplot2) 15 | packages(ggmap) 16 | packages(rbokeh) 17 | packages(RCurl) 18 | packages(dygraphs) 19 | packages(xts) 20 | library(xts) 21 | library(dygraphs) 22 | library(dplyr) 23 | require(rgdal) 24 | library(sp) 25 | library(maptools) 26 | library(leaflet) 27 | library(ggplot2) 28 | library(ggmap) #geocoding 29 | library(rbokeh) 30 | library(RCurl) 31 | ###################### 32 | 33 | #load data from GitHub 34 | datdf <- getURL('https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/master/data/clusterEnergyLocation.csv') 35 | df <- read.csv(text = datdf) 36 | 37 | #Jitter buildings that are at same lat/long 38 | df$Lat <- round(jitter(df$Lat, factor = 0.00001),5) 39 | df$Long<- round(jitter(df$Long, factor = 0.00001),5) 40 | 41 | df$kmeans_label <- df$kmeans_label + 1 #label is 0:3 - add 1 to make 1:4 42 | df$kmeans_label <- as.factor(df$kmeans_label)#as factor since this is label not numeric 43 | df$ReClustering <- df$ReClustering+1 #binary reclustering - 0/1 --> 1/2 44 | df$ReClustering <- as.factor(df$ReClustering) 45 | 46 | df$billValues <- gsub('\\$','', df$Annual.Energy.Bill..USD.)#remove $ from value 47 | df$billValues <- gsub(',','', df$billValues) #remove , from value 48 | df$billValues <- as.numeric(gsub(' ','', df$billValues))#remove ' ' from value 49 | 50 | 51 | 52 | ############################## 53 | ## Leaflet Map 1 - show energy bill at each building 54 | qpal <- colorQuantile("YlGnBu", df$Measured) 55 | 56 | map <- leaflet(data = df) %>% 57 | addProviderTiles("CartoDB.Positron")%>% 58 | addCircleMarkers( 59 | radius = 6, 60 | fillColor = ~qpal(df$Measured),fillOpacity = 0.7, 61 | stroke = T, weight =2,color='#2b1d0e', 62 | popup = paste('Property: ', df$property_name,"
Annual Bill: ", df$Annual.Energy.Bill..USD.)) %>% 63 | addLegend(position = "bottomright",na.label = "NA", title="Annual Energy Cost",colors=c('#FFFFD9','#99D6B9','#2280B8','#081D58'), labels = c('< $2,000','$2,000 - $4,000','$4,001- $6,000','$6,000 +')) 64 | map 65 | 66 | ## Leaflet Map 2 - show clustering assignment of each building 67 | qualPalette <- c("#1a9641","#d7191c") 68 | clusterLabels <- seq(1:2) 69 | df$color <- qualPalette[match(df$ReClustering, clusterLabels)] 70 | qpal2 <- colorFactor(palette=qualPalette, df$ReClustering) 71 | 72 | map2 <- leaflet(data = df) %>% 73 | addProviderTiles("CartoDB.Positron")%>% 74 | addCircleMarkers( 75 | lng = df$Long, 76 | lat = df$Lat, 77 | radius = 6, 78 | color = ~qpal2(df$ReClustering), 79 | stroke = F, fillOpacity = 0.7, 80 | popup = ~property_name) 81 | 82 | addLegend(map2,position = "bottomright", colors=qualPalette,labels=c("Efficient","Inefficient"),na.label = "NA", title="Cluster Labels", opacity =0.7) 83 | map2 84 | ############################## 85 | # Scatter plot with rbokeh- 86 | 87 | p2 <- figure() %>% 88 | ly_points(heating_gas, plug_load_consumption, data = df, color = kmeans_label,hover = c(heating_gas, plug_load_consumption)) 89 | p2 90 | ##################################### 91 | # Working with sensor data 92 | dat <- getURL('https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/master/data/CombinedSensorData.csv') 93 | allSensors <- read.csv(text = dat) 94 | allSensors$Unitarian.s <- as.POSIXct(allSensors$Unitarian.s,format='%m/%d/%Y %H:%M') 95 | temps <- data.frame(allSensors$Unitarian.s, allSensors$Unitarian.t, allSensors$Parish.t, allSensors$Basement.t,allSensors$Office.t) 96 | colnames(temps) <- c('Time','SanctuaryTemp','ParishTemp','BasementTemp','OfficeTemp') 97 | t<- temps[,-1] 98 | allTemps <- xts(t,order.by = temps$Time)# Create time series object 99 | dygraph(allTemps) #plot time series with dygraph 100 | 101 | ##################################### 102 | 103 | 104 | -------------------------------------------------------------------------------- /README.md: -------------------------------------------------------------------------------- 1 | ### SparkSummitDemo 2 | --- 3 | 4 | This repository contains a Python Notebook and R Shiny App created using IBM Data Science Experience. Sign up or log-in on [Data Science Experience](http://datascience.ibm.com/) and follow along with the steps below. 5 | 6 | --- 7 | 8 | ### 1. Data Science Experience Set up 9 | - First [download the repository](https://github.com/IBMDataScience/SparkSummitDemo/archive/master.zip) to your local environment 10 | - Unzip this zip file on your computer so you have a directory with all the assets in the repository. We will be using the data from the data directory. 11 | - Log-in to Data Science Experience 12 | - #### Create a project 13 | 14 | 1. Click on the left hand side "hamburger" icon and then click on My Projects to see a list of your projects. If this is a new account, you should only see a default project. 15 | 16 | > 17 | 18 | 2. Click on the create project icon on the top right of the project list. 19 | 20 | > 21 | 22 | 3. Type a name for your project. For instance, "DSX Lab". A Spark service and an object storage will be automatically selected as well as a container with a default name. A container is a directory on the object storage. Click on Create. 23 | 24 | > 25 | 26 | - Click on the add data assets + icon 27 | 28 | > 29 | 30 | - Click on the Add file and select each of the files from the data directory of the downloaded zip: BlocPower_T, CDD-HDD_Features, and HDD_Features 31 | - Once the file is loaded, click on Apply to add this file to your project. 32 | - You should now see your 3 files in your project 33 | 34 | > 35 | 36 | 37 | 38 | ### 2. Running Jupyter Notebook 39 | - Click on New Notebook 40 | - Click the tab for From URL, add a Name for the notebook 41 | - Copy the URL for the Jupyter notebook - https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/master/BlocPower%20with%20Sparkling.ipynb 42 | 43 | > 44 | 45 | - Now you should be in the notebook you loaded from this repository 46 | - Once you are inside the notebook, you need to insert credentials to access the data you uploaded. 47 | - Click inside the blank cell near the top of the notebook (shown in screen shot below) 48 | - Click on BlocPower_T.csv on the right side to Insert Credentials 49 | 50 | > 51 | 52 | ** If you don't see your files click on this icon: ** 53 | 54 | - After you add the credentials, rename the variable to be called `credentials` in code you added, shown below 55 | 56 | > 57 | 58 | 59 | - Now you can run each cell to recreate the analysis 60 | - Follow along each of the following steps: 61 | - Data cleaning 62 | - Fitting a linear regression model 63 | - Conducting k-means clustering 64 | 65 | ### 3. Running the Shiny App - Flex Dashboard 66 | - Open RStudio in Data Science Experience from the left navigation bar 67 | - Create a new R Markdown Document, select Shiny as the type R Markdown document (note you may be required to download some R packages at this time) 68 | 69 | > 70 | 71 | - Copy the raw [R Markdown from here](https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/master/shinyDemo.Rmd) 72 | - Replace the default content in the new R Markdown file by pasting the code in the file 73 | - Select lines 21 - 65 and execute (This is a one time set up to install all necessary packages) 74 | - Click the "Run Document" button to generate the dashboard from the R script 75 | - Having popup blockers installed may interfere with launching the dashboard 76 | - Click the button "Open in Browser" to see the app in a web browser 77 | - Open the app in a browser to interact with it, share the link with anyone 78 | -------------------------------------------------------------------------------- /data/CDD-HDD-Features.csv: -------------------------------------------------------------------------------- 1 | Property Name,plug_load_consumption,ac_consumption,domestic_gas,heating_gas ChurchofStCeciliaReport,11.65140596,0.983531348,0.096226455,0.366193236 69thLaneStudio,32.76988438,5.008371873,0.322599638,0.57959223 UnitarianChurchofStatenIsland,2.345049272,0.296133819,0.032705972,0.036460695 SSolowayandSonsPIPPrinting,4.618817159,0.765188561,0.02750427,0.23466382 SunnysideJewishCenterReport,9.323896186,1.23432624,0.322599638,0.57959223 MoonbluIncdbaJoyBurgerBar,45.17394981,8.437620188,3.813677406,0.673378309 TempleSholom,7.108796544,1.863127708,0.029156422,0.560720947 TempleSholom_(1),7.108796544,1.863127708,0.029156422,0.560720947 EastMidwoodJewishCenter,5.65569336,0.356230155,0.074841027,1.352528204 UnitedChurchofGod,9.417943048,1.768558542,0.357803094,0.210292496 RossvilleAMEZionChurch,2.697652244,0.179331772,0.042588743,0.639048418 PentecostalHouseofPrayer,3.548317442,0.838068798,0.322599638,0.57959223 BethelCommunityChurch,4.084495193,1.027600769,0.048815539,0.636409562 RefugeChurchofGod,4.533751037,0.902759537,0.032833511,0.719650745 BethelAMEChurch,3.544474854,0.216975049,0.017726724,0.007526078 BethelAMEChurchHouse,5.543205628,2.741274765,0.322599638,0.57959223 GospelAssembly,9.20209303,1.398907677,0.101437594,0.621744224 FirstPresbyterianChurchofWhitestone,3.178672445,0.481868754,0.066364847,0.057102961 FirstSpanishMethodistChurch,1.91273045,0.175044543,0.17700395,0.156157661 SpringfieldGardensChurchoftheNazarene_-_Church,4.185433735,1.738493008,0.079863788,0.021132007 SpringfieldGardensChurchoftheNazarene_-_Parsonage,8.443327866,1.372648498,0.254538007,0.029613568 GraceandMercyChristianNationalChurch,6.870328451,1.048357339,0.322599638,0.57959223 ChurchofGodMissionInternational,0.738576742,0.208891091,0.025937254,0.25087818 BethanyFrenchBaptistChurch,7.098200237,2.101349822,0.001729906,1.125770094 RockawayYouthTaskForce,10.38467261,1.18091698,0.322599638,0.57959223 ReshapingLivesMinistries,3.841720528,0.696030264,0.322599638,0.57959223 ChurchofGodofThirdAvenue,3.310471177,0.645675372,0.134225048,0.716831461 FirstRevelationChurch,5.657046721,1.278143306,0.063112266,0.950962289 UnitedMethodistChurchofHempstead-Church,1.761865661,0.640510396,0.11639834,0.439075233 UnitedMethodistChurchofHempstead-Parsonage,6.278926767,3.127464625,0.322599638,0.57959223 UnitedMethodistChurchofHempstead-ParishHall,5.192908824,0.658387522,0.096477999,0.364042333 Immanual-FirstSpanishUMC-Parsonage,1.975340929,0.138996202,0.322599638,0.57959223 Immanuel-FirstSpanishUMC-Church,0.68275628,0.085947726,0.322599638,0.57959223 PilgrimCathedralofEastNewYork,1.554692604,0.05159382,0.060403409,0.651957702 WaysideBaptistChurch,13.90091699,1.725385073,0.08527751,1.887574809 WaysideBaptistChurch-ManorBuilding,4.499702774,0.576713216,0.039499521,0.021089902 ElPuente,6.386627252,0.517260008,0.05843415,1.202789658 NewMtZionBaptistChurch,12.85334066,2.279995723,0.021255609,0.375766709 UPROSE,6.669401635,2.792303672,0.185843516,1.695685383 InglesiaPentecostalRosadeSaron,3.269593796,0.097104083,0.322599638,0.57959223 BethelUnitedMethodistChurch,3.382436876,0.26320503,0.080937437,0.018951518 ElLiriodelosValles,9.851185956,1.0758177,0.097451801,0.563577816 TrinityUMCEastRichmondHill,5.379950668,1.006534335,0.322599638,0.57959223 TrinityUMCEastRichmondHill-Parsonage,0.279239613,0.057400161,0.322599638,0.57959223 TheLambsChurchoftheNazarene,2.312499601,0.790770838,0.188581935,0.471708481 HisMajestyInternationalFellowship,9.662210377,0.958768188,0.104703939,0.218353557 ChristianMissionofStJohn316,9.371488788,1.804539781,0.017235803,0.771170755 ElgantoLLC,1.974116534,0.202893177,0.12721259,0.475792656 "4-1_Vision_Education_Media,_LLC_-_NYSERDA_Energy_Assessment_Report",9.851185956,1.0758177,0.322599638,0.57959223 NYSERDA_Energy_Assessment_Report_-_Central_Family_Life_Center,4.985847164,1.413640438,0.130748977,0.562104934 FlowerWorksdbaJaricanFlorist,4.585292984,0.466875384,0.226912528,0.692196232 CongregationOhabZedekSynagogue,16.45993959,3.61484793,0.178244823,0.288464788 4-203-236-StPaulUMC-Church,4.174132412,1.015005976,0.166664921,0.827056103 MemorialBaptistChurch,8.76143734,0.390915945,0.028730894,0.202395508 AnchorHouse-ParkPl,40.67305279,6.587211456,0.786570671,0.700616647 FirstUMCofJamaica-Church,2.766020187,0.674934082,0.137837436,0.040228192 FirstUMCofJamaica-Parsonage,1.78004252,0.434886618,0.00949314,0.63894436 FirstUMCofJamaica-EdBuilding,2.977866093,0.726689415,0.238984204,0.041268058 AnchorHouse-BergenSt,20.73354105,6.861011721,0.829357852,1.750591387 GraceUMCofStAlbans-Church,8.777209477,1.312875979,0.0757172,1.072885523 GraceUMCofStAlbansParsonage,4.53175944,1.083655061,0.101114142,0.719890853 HarrietTubmanFannieLouHamerCollectivedbaSistasPlace,9.851185956,1.0758177,0.322599638,0.57959223 ReachOutAndTouchMinistriesReport,0.834317969,0.174735026,0.207653904,0.62961649 AbengCenter,9.744489836,1.252960949,0.322599638,0.57959223 HouseofArtGallery,3.062213253,0.849198272,0.322599638,0.57959223 SouthernBaptistChurch,3.499831131,3.175873094,0.072450134,0.409307863 StMarksUnitedMethodistChurch,9.04369668,0.858945884,0.041072483,0.264007758 StMarksUnitedMethodistChurch-Parsonage,4.263552658,3.43826772,0.629953778,0.641888508 NYSERDA_Energy_Assessment_Report_-_Spanish_Van_Dyckman_SDA_Church,9.851185956,1.0758177,0.322599638,0.57959223 CommunityBaptistChurch,4.621996153,5.579672945,0.064366715,2.997384437 NYSERDA_Energy_Assessment_Report_-_AME_Zion_Church_on_the_Hill,9.851185956,1.0758177,0.322599638,0.57959223 RendallMemorialPresbyterianChurch,2.257090792,0.773500944,0.011178147,0.745507841 NYSERDA_Energy_Assessment_Report_-_The_CHS_Group,9.302564371,1.065507234,0.035786022,0.11972482 NYSERDA_Energy_Assessment_-_Island_Bay_Grill_and_Lounge,12.63767847,1.24402089,0.75567522,0.806243585 MountLebanonBaptistChurch,10.72618377,2.389513524,0.072817375,0.263627561 SouthIslandMedicalAssociates,6.733903739,1.889032342,0.322599638,0.57959223 NYSERDA_Energy_Assessment_-_DAC_Unisex_Beauty_Salon,14.62159848,4.583801141,0.622908318,0.904659735 NYSERDA_Energy_Assessment_-_Nelly's_Nails_and_More,9.252877272,3.041561364,0.123185352,1.678320175 JohnLeporeInsuranceAgencyInc,8.214417884,1.333895529,0.628839944,0.881580028 NYSERDA_Energy_Assessment_-_Pilgrim_Church_of_Arverne,6.663307702,1.795378973,0.020324756,0.729646517 NYSERDA_Energy_Assessment_-_1011_Tavern_Corp_-_Evelyn,34.62659838,4.203384545,0.322599638,0.57959223 CongregationKnessethBaisYaakov,31.06380465,5.655447289,0.034741191,0.744458809 TheStarPeople'sLaundromat,13.62358644,2.009402259,4.04714962,0.691344698 FirstCentralBaptistChurch,4.19004544,1.05462335,0.014669148,0.171185639 CAAABagels,66.55766861,14.7474438,4.226072264,0.325951824 NYSERDA_Energy_Assessment_Report_-_World_Champions_Karate,5.184105305,1.196938572,0.20363922,0.465249447 PaninicoCafeReport,56.22216248,14.77873855,2.767528115,1.341849228 Curran'sSuperiorMeatsReport,47.59406893,10.59679312,1.144460385,0.428884904 Sigma_AlphaLLCReport,5.328650492,2.848552332,0.322599638,0.57959223 ThaiRock,14.37370495,2.59972129,0.360459895,1.007950087 SaintJohnAMEChurch,4.812969592,2.728716412,0.068733356,0.277840437 ArverneChurchofGod-COGCA,13.23584938,2.530386617,0.135057442,0.705468567 ArverneChurchofGod,11.82682711,1.960057297,0.270921306,1.772506827 SaintPaulsChurch-OfficeAuditorium,1.707258773,0.081024854,0.018924078,0.110041817 SaintPaulsChurchRectory,1.272268767,0.049233582,0.047476906,0.327414462 SaintPaulsChurchRectory,1.272268767,0.049233582,0.047476906,0.327414462 GloverMemorialBaptistChurch,2.119974686,0.364748535,0.181762591,0.443632916 GatewayChristianCenter,4.823929393,1.178334481,0.014205602,0.002102632 NewTestamentChristianChurch,9.851185956,1.0758177,0.322599638,0.57959223 BrooklynLegalServicesCorpA,10.4912273,1.247200992,0.17626613,0.209263683 JesusTheGoodShepherdChurchReport,4.556191536,1.725074748,0.018650987,0.02764164 LunaNYCafeCorpReport,61.53712907,3.384529556,0.322599638,0.57959223 ChurchoftheLivingHopeReport,1.121467186,0.090291838,0.097964685,0.441250375 -------------------------------------------------------------------------------- /shinyDemo.Rmd: -------------------------------------------------------------------------------- 1 | --- 2 | title: "IBM Data Science Experience" 3 | runtime: shiny 4 | output: 5 | flexdashboard::flex_dashboard: 6 | orientation: rows 7 | vertical_layout: fill 8 | source_code: https://github.com/IBMDataScience/SparkSummitDemo 9 | social: [ "twitter", "facebook", "linkedin" ] 10 | 11 | 12 | --- 13 | 14 | Data Exploration 15 | ===================================== 16 | 17 | ```{r setup, include=FALSE} 18 | 19 | 20 | ### Run this first before Knitting the RMD ############## 21 | if(!require(devtools)){ 22 | install.packages("devtools") 23 | library(devtools) 24 | } 25 | 26 | if(!require(flexdashboard)){ 27 | install_github("gfilla/flexdashboard") 28 | library(flexdashboard) 29 | } 30 | 31 | ######################################################## 32 | 33 | #check for packages install if necessary 34 | packages <- function(x){ 35 | x <- as.character(match.call()[[2]]) 36 | if (!require(x,character.only=TRUE)){ 37 | install.packages(pkgs=x,repos="http://cran.r-project.org") 38 | require(x,character.only=TRUE) 39 | } 40 | } 41 | packages(shiny) 42 | packages(leaflet) 43 | packages(rbokeh) 44 | packages(ggplot2) 45 | packages(knitr) 46 | packages(dplyr) 47 | packages(plotly) 48 | packages(xts) 49 | packages(dygraphs) 50 | packages(png) 51 | packages(RCurl) 52 | library(devtools) 53 | library(shiny) 54 | library(flexdashboard) 55 | library(leaflet) 56 | library(rbokeh) 57 | library(ggplot2) 58 | library(knitr) 59 | library(dplyr) 60 | library(plotly) 61 | library(xts) 62 | library(dygraphs) 63 | library(png) 64 | library(RCurl) 65 | 66 | #setwd('/srv/shiny-server/shinyDemo') 67 | setwd('~/')#home 68 | 69 | datdf <- getURL('https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/master/data/clusterEnergyLocation.csv') 70 | df <- read.csv(text = datdf) 71 | 72 | #Jitter buildings that are at same lat/long 73 | df$Lat <- round(jitter(df$Lat, factor = 0.00001),5) 74 | df$Long<- round(jitter(df$Long, factor = 0.00001),5) 75 | 76 | 77 | df$kmeans_label <- df$kmeans_label + 1 78 | df$kmeans_label <- as.factor(df$kmeans_label) 79 | df$ReClustering <- df$ReClustering+1 80 | df$ReClustering <- as.factor(df$ReClustering) 81 | 82 | df$plugChg <-mean(df$plug_load_consumption)/df$plug_load_consumption - 1 83 | df$acChg <- mean(df$ac_consumption)/df$ac_consumption - 1 84 | df$domesticChg <-mean(df$domestic_gas)/df$domestic_gas - 1 85 | df$heatingChg <-mean(df$heating_gas)/df$heating_gas - 1 86 | df$EnergySurplus <- round(((1*(df$plugChg + df$acChg + df$domesticChg + df$heatingChg))/4)*100,0) 87 | 88 | df$billValues <- gsub('\\$','', df$Annual.Energy.Bill..USD.) 89 | df$billValues <- gsub(',','', df$billValues) 90 | df$billValues <- as.numeric(gsub(' ','', df$billValues)) 91 | 92 | dat <- getURL('https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/master/data/CombinedSensorData.csv') 93 | allSensors <- read.csv(text = dat) 94 | 95 | allSensors$Unitarian.s <- as.POSIXct(allSensors$Unitarian.s,format='%m/%d/%Y %H:%M') 96 | temps <- data.frame(allSensors$Unitarian.s, allSensors$Unitarian.t, allSensors$Parish.t, allSensors$Basement.t,allSensors$Office.t) 97 | colnames(temps) <- c('Time','SanctuaryTemp','ParishTemp','BasementTemp','OfficeTemp') 98 | t<- temps[,-1] 99 | allTemps <- xts(t,order.by = temps$Time) 100 | 101 | #function used for scoring 102 | scoreProperty <- function(num_stories,sq_feet, num_plugged_equipment){ 103 | # b's come from regression model 104 | # n's come from normalization 105 | b0 = -0.030743500313 106 | b2 = 0.0285973339538 107 | b3 = 0.668102284559 108 | b4 = 0.374074888107 109 | 110 | n0 = 380400.00 111 | n2 = 4.00 112 | n3 = 65000.00 113 | n4 = 43.00 114 | 115 | x2 = num_stories/n2 116 | x3 = sq_feet/n3 117 | x4 = num_plugged_equipment/n4 118 | energy = b0 + b2 * x2 + b3 * x3 + b4 * x4 119 | kWh = energy*n0 120 | usd = kWh*0.18 # $0.18 per kWh in NYC (on average) 121 | return(c(kWh, usd)) 122 | } 123 | 124 | bplogo <- "https://raw.githubusercontent.com/IBMDataScience/SparkSummitDemo/master/blocpowertransp.png" 125 | 126 | ``` 127 | 128 | Row {data-height=200} 129 | ----------------------------------------------------------------------- 130 | 131 | ### ![blocpower](`r bplogo`) Build a Better World. Develop green energy projects in American inner cities. 132 | 133 | ```{r} 134 | renderValueBox({ 135 | 136 | valueBox(value = '', icon = "") 137 | }) 138 | 139 | ``` 140 | 141 | ### Annual Energy Bill (USD) 142 | 143 | ```{r} 144 | renderValueBox({ 145 | bill <- prop_data() 146 | #cat(toString(bill)) 147 | cat(toString(getwd())) 148 | valueBox(value = bill$Annual.Energy.Bill..USD., icon = "glyphicon-usd") 149 | }) 150 | ``` 151 | 152 | ### Average Energy Compared to Benchmark 153 | 154 | ```{r} 155 | renderValueBox({ 156 | energyUse <- prop_data()$EnergySurplus 157 | valueBox(value = paste0(energyUse,'%'), 158 | icon = "glyphicon-tree-deciduous", 159 | color = ifelse(energyUse < 0, "danger", "success") 160 | ) 161 | }) 162 | ``` 163 | 164 | 165 | 166 | Row {data-height=600} 167 | ----------------------------------------------------------------------- 168 | 169 | ### Energy Consumption Map 170 | 171 | ```{r} 172 | 173 | click_marker <- eventReactive(input$map_marker_click, { 174 | 175 | x <- input$map_marker_click 176 | 177 | y <-c(x[3], x[4]) 178 | #cat(toString(y)) 179 | return(y) 180 | }) 181 | 182 | 183 | qpal <- colorQuantile("YlGnBu", df$Measured) 184 | 185 | output$map <- renderLeaflet({ 186 | 187 | map2 <- leaflet(data = df) %>% 188 | addProviderTiles("CartoDB.Positron")%>% 189 | addCircleMarkers( 190 | radius = 6, 191 | fillColor = ~qpal(df$Measured),fillOpacity = 0.7, 192 | stroke = T, weight =2,color='#2b1d0e', 193 | popup = paste('Property: ', df$property_name,"
Annual Bill: ", df$Annual.Energy.Bill..USD.)) %>% 194 | addLegend(position = "bottomright",na.label = "NA", title="Annual Energy Cost",colors=c('#FFFFD9','#99D6B9','#2280B8','#081D58'), labels = c('< $2,000','$2,000 - $4,000','$4,001- $6,000','$6,000 +')) 195 | map2 196 | }) 197 | 198 | 199 | 200 | prop_data <- reactive({ 201 | 202 | clicked_building <- click_marker() 203 | # Fetch data for the clicked tract 204 | barchart_values <- df[which(df$Lat == round(as.numeric(clicked_building[1]),5) & df$Long == round(as.numeric(clicked_building[2]),5)),] 205 | # barchart_values <- df[which(df$Lat == as.vector(clicked_building[1]) & df$Long == as.vector(clicked_building[2])),] 206 | cat(toString(barchart_values)) 207 | return(barchart_values) 208 | 209 | }) 210 | 211 | leafletOutput('map') 212 | 213 | ``` 214 | 215 | ### Selected Building Energy Types 216 | 217 | ```{r} 218 | 219 | output$bars <- renderPlotly({ 220 | barplot_data <- prop_data() 221 | #cat(toString(barplot_data)) 222 | 223 | xLabel <- list( 224 | title = " " 225 | ) 226 | yLabel <- list( 227 | title = "Energy Consumption", 228 | showticklabels = F, 229 | range = list(0,1) 230 | ) 231 | 232 | 233 | if(dim(barplot_data)[1] != 0){ 234 | 235 | #print(barplot_data) 236 | updated_vals <- c(barplot_data$plug_load_consumption, barplot_data$ac_consumption, barplot_data$domestic_gas, barplot_data$heating_gas) 237 | 238 | p <- plot_ly( 239 | x = c('Plug','AC','Home Gas', 'Heat Gas'), 240 | y = updated_vals, 241 | name = "Selected Property Values", 242 | type = "bar") %>% 243 | layout(xaxis = xLabel, yaxis=yLabel) 244 | p 245 | }else{ 246 | bar_vals <- c(mean(df$plug_load_consumption), mean(df$ac_consumption), mean(df$domestic_gas), mean(df$heating_gas)) 247 | 248 | p <- plot_ly( 249 | x =c('Plug','AC','Home Gas', 'Heat Gas'), 250 | y = bar_vals, 251 | name = "Mean Property Values", 252 | type = "bar") %>% 253 | layout(xaxis = xLabel, yaxis=yLabel) 254 | p 255 | } 256 | 257 | p2 <- add_trace( 258 | p, 259 | x =c('Plug','AC','Home Gas', 'Heat Gas'), 260 | y = c(mean(df$plug_load_consumption),mean(df$ac_consumption), mean(df$domestic_gas),mean(df$heating_gas)), 261 | name = "Mean Values", 262 | type = "bar") 263 | p2 264 | 265 | }) 266 | 267 | plotlyOutput('bars') 268 | 269 | ``` 270 | 271 | 272 | Row {data-height=300} 273 | ----------------------------------------------------------------------- 274 | 275 | 276 | ### Sensor Temperature Data - Different Building Locations 277 | 278 | ```{r} 279 | 280 | dygraph(allTemps) 281 | 282 | 283 | ``` 284 | 285 | 286 | Cluster Analysis 287 | ===================================== 288 | 289 | 290 | Row 291 | ----------------------------------------------------------------------- 292 | 293 | ### Energy Consumption Map 294 | 295 | ```{r} 296 | 297 | 298 | # qualPalette <- c("#d7191c", "#fdae61", "#a6d96a", "#1a9641") 299 | # clusterLabels <- seq(1:4) 300 | # df$color <- qualPalette[match(df$kmeans_label, clusterLabels)] 301 | # qpal2 <- colorFactor(palette=qualPalette, df$kmeans_label) 302 | 303 | qualPalette <- c("#1a9641","#d7191c") 304 | clusterLabels <- seq(1:2) 305 | df$color <- qualPalette[match(df$ReClustering, clusterLabels)] 306 | qpal2 <- colorFactor(palette=qualPalette, df$ReClustering) 307 | 308 | 309 | map2 <- leaflet(data = df) %>% 310 | 311 | addProviderTiles("CartoDB.Positron")%>% 312 | addCircleMarkers( 313 | lng = df$Long, 314 | lat = df$Lat, 315 | radius = 6, 316 | color = ~qpal2(df$ReClustering), 317 | stroke = F, fillOpacity = 0.7, 318 | popup = ~property_name) 319 | 320 | addLegend(map2,position = "bottomright", colors=qualPalette,labels=c("Efficient","Inefficient"),na.label = "NA", title="Cluster Labels", opacity =0.7) 321 | map2 322 | 323 | 324 | ``` 325 | 326 | ### Clusters by Heating and Plug Consumption 327 | 328 | ```{r} 329 | 330 | p2 <- figure() %>% 331 | ly_points(heating_gas*100, plug_load_consumption*100, data = df,fill_color =color,fill_alpha = 0.6, hover = c(property_name,Annual.Energy.Bill..USD. ), xlab='Heating Gas', ylab = 'Plug Load Consumption') %>% 332 | y_axis(number_formatter = "printf", format = "%d%%") %>% 333 | x_axis(number_formatter = "printf", format = "%d%%") 334 | p2 335 | 336 | 337 | 338 | ``` 339 | 340 | Predictive Model 341 | ===================================== 342 | 343 | Row {.sidebar data-width=400} 344 | ----------------------------------------------------------------------- 345 | 346 | ### Predict Energy Use and Cost for New Property 347 | 348 | ```{r} 349 | 350 | #coefficient 1 - Stories 351 | sliderInput("stories", "Enter number of Stories:", 352 | min = 0, max = 4, value = 1, step = 1 353 | ) 354 | #coefficient 2 - Sq. Foot 355 | sliderInput("sqft", "Enter Property Square Footage:", 356 | min = 0, max = 65000, value = 20000, step = 100 357 | ) 358 | 359 | #coefficient 3 - # of Plugged Outlets 360 | sliderInput("plugged", "Enter Number of Plugged Outlets:", 361 | min = 0, max = 43, value = 29, step = 1 362 | ) 363 | 364 | 365 | score <- reactive({ 366 | scoreProperty(input$stories,input$sqft,input$plugged) 367 | }) 368 | 369 | #cat(toString(score[1])) 370 | 371 | 372 | ``` 373 | 374 | Row {data-height=200} 375 | ----------------------------------------------------------------------- 376 | 377 | 378 | 379 | ### Predicted Annual Energy Bill (USD @ $0.18/kWh) 380 | 381 | ```{r} 382 | renderGauge({ 383 | bill<- score()[2] 384 | gauge(bill, min = 0, max = 100000, symbol = '$', gaugeSectors( 385 | success = c(0, 2000), warning = c(2001, 15000), danger = c(15001, 100000))) 386 | 387 | }) 388 | 389 | ``` 390 | 391 | ### Predicted Annual Energy (kWh) 392 | 393 | ```{r} 394 | 395 | renderGauge({ 396 | kwh <- score()[1] 397 | gauge(kwh, min = 0, max = 380400, gaugeSectors( 398 | success = c(0, 100000), warning = c(100001,200000), danger = c(200001,400000))) 399 | 400 | }) 401 | 402 | ``` 403 | 404 | 405 | Row 406 | ----------------------------------------------------------------------- 407 | 408 | 409 | ### Accuracy of Linear Regression Fit 410 | 411 | ```{r} 412 | 413 | p3 <- figure() %>% 414 | ly_points(Measured ,Predicted, data = df,fill_color = color, fill_alpha=0.6,hover = c(property_name, ReClustering), xlab='Measured Energy Usage', ylab='Predicted Energy Usage') 415 | p3<- ly_abline(p3,a=0, b=1, color='blue') 416 | p3 417 | 418 | 419 | ``` 420 | 421 | Data Table 422 | ===================================== 423 | 424 | 425 | Column 426 | ----------------------------------------------------------------------- 427 | 428 | ### Raw Data Table 429 | 430 | ```{r} 431 | 432 | kable(df) 433 | 434 | 435 | 436 | ``` 437 | -------------------------------------------------------------------------------- /data/clusterEnergyLocation.csv: -------------------------------------------------------------------------------- 1 | AddressID,property_name,plug_load_consumption,ac_consumption,domestic_gas,heating_gas,kmeans_label,pca_1,pca_2,pca_3,pca_3,Address,Zipcode,Long,Lat,Energy,Measured,Energy in KWH,Annual Energy Bill (USD),Predicted,ReClustering 2 | 125 East 105th Street10029,ChurchofStCeciliaReport,0.175057303,0.066550426,0.022769714,0.122170927,0,0.059554872,0.07059638,0.059554872,0.07059638,125 East 105th Street,10029,-73.947326,40.7919189,0.143237331,0.309858044,117869.9999," $21,216.60 ",0.183957072,0 3 | 69-71 Grand Avenue11378,69thLaneStudio,0.492353249,0.33889035,0.076335571,0.193365997,3,-0.334241327,0.031452504,-0.334241327,0.031452504,69-71 Grand Avenue,11378,-73.893311,40.7274352,0.393899623,0.042605152,16206.99982," $2,917.26 ",0.027382748,1 4 | 312 Fillmore St10301,UnitarianChurchofStatenIsland,0.035233345,0.020037828,0.007739094,0.01216417,0,0.197073112,0.159979313,0.197073112,0.159979313,312 Fillmore St,10301,-74.0986983,40.6429808,0.037827197,0.040914826,15563.99981," $2,801.52 ",0.036065563,0 5 | 421 Doughty Blvd11096,SSolowayandSonsPIPPrinting,0.069395717,0.051776311,0.006508235,0.07828953,0,0.148448222,0.097597044,0.148448222,0.097597044,421 Doughty Blvd,11096,-73.7469957,40.6226744,0.075394823,0.067957413,25850.99991," $4,653.18 ",0.053783,0 6 | 40-20 47th Avenue11104,SunnysideJewishCenterReport,0.140087482,0.083520406,0.076335571,0.193365997,0,0.034551871,0.007363874,0.034551871,0.007363874,40-20 47th Avenue,11104,-73.923901,40.741461,0.112403285,0.085023659,32342.99988," $5,821.74 ",0.059362888,0 7 | 361 6th Ave10014,MoonbluIncdbaJoyBurgerBar,0.678718933,0.570929661,0.902416515,0.224655303,1,-1.003385858,0.179965392,-1.003385858,0.179965392,361 6th Ave,10014,-74.000832,40.732327,0.7088324,0.281119874,106938.0001," $19,248.84 ",0.189959381,1 8 | 2075 East 68th Street11234,TempleSholom,0.106806574,0.126068115,0.006899177,0.18707008,0,0.066075651,-0.00856183,0.066075651,-0.00856183,2075 East 68th Street,11234,-73.9096263,40.6188665,0.126878588,0.601958465,228985.0001," $41,217.30 ",0.45764432,0 9 | 2075 East 68th Street11234,TempleSholom_(1),0.106806574,0.126068115,0.006899177,0.18707008,0,0.066075651,-0.00856183,0.066075651,-0.00856183,2075 East 68th Street,11234,-73.9096263,40.6188665,0.126878588,0.601958465,228985.0001," $41,217.30 ",0.45764432,0 10 | 1625 Ocean Avenue11230,EastMidwoodJewishCenter,0.084974331,0.024104233,0.017709358,0.451236147,2,0.096251088,-0.256488421,0.096251088,-0.256488421,1625 Ocean Avenue,11230,-73.9553737,40.6223507,0.085341709,1,380400," $68,472.00 ",0.980672398,1 11 | 84 Rogers Avenue11553,UnitedChurchofGod,0.141500495,0.119669114,0.084665636,0.070158667,0,0.025922329,0.125596194,0.025922329,0.125596194,84 Rogers Avenue,11553,-73.953147,40.67385,0.021748481,0.011855941,4509.999956, $811.80 ,0.038916703,0 12 | 584 Bloomindale Road10309,RossvilleAMEZionChurch,0.040531051,0.012134444,0.010077618,0.21320202,0,0.168624227,-0.03259595,0.168624227,-0.03259595,584 Bloomindale Road,10309,-74.218268,40.539434,0.041145883,0.02818612,10722.00005," $1,929.96 ",0.045581555,0 13 | 203 Nostrand Ave11205,PentecostalHouseofPrayer,0.053311925,0.056707736,0.076335571,0.193365997,0,0.104325196,-0.001358987,0.104325196,-0.001358987,203 Nostrand Ave,11205,-73.951669,40.69221,0.140010555,0.11500617,43748.34707," $7,874.70 ",0.031674582,0 14 | 51-53 Van Duzer Street10301,BethelCommunityChurch,0.061367762,0.069532374,0.011551042,0.212321634,0,0.121505876,-0.033278532,0.121505876,-0.033278532,51-53 Van Duzer Street,10301,-74.077492,40.6369886,0.0296733,0.016732387,6365.000015," $1,145.70 ",0.028191164,0 15 | 595 Quincy Street11221,RefugeChurchofGod,0.068117636,0.06108502,0.007769273,0.240092908,0,0.12016944,-0.059425943,0.12016944,-0.059425943,595 Quincy Street,11221,-73.9353011,40.6889701,0.038707779,0.039773922,15129.99993," $2,723.40 ",0.044262925,0 16 | 20 Simmons Street11726,BethelAMEChurch,0.053254192,0.014681568,0.00419461,0.002510882,0,0.192106276,0.171221968,0.192106276,0.171221968,20 Simmons Street,11726,-73.405297,40.69052,0.049747965,0.134521556,51171.9999," $9,210.96 ",0.141739914,0 17 | 24 Simmons Street11726,BethelAMEChurchHouse,0.083284252,0.185487737,0.076335571,0.193365997,0,0.010444218,-0.007581308,0.010444218,-0.007581308,24 Simmons Street,11726,-73.4050481,40.6910751,0.009220353,0.00581756,2212.999824, $398.34 ,0.078278421,0 18 | 109-14 Farmers Blvd11412,GospelAssembly,0.138257442,0.094656771,0.024002806,0.207428922,0,0.05335441,-0.018310089,0.05335441,-0.018310089,109-14 Farmers Blvd,11412,-73.766955,40.7035539,0.143061678,0.056737645,21583.00016," $3,884.94 ",0.012268815,0 19 | 15-43 149th Street11357,FirstPresbyterianChurchofWhitestone,0.04775817,0.03260554,0.015703671,0.01905093,0,0.17696299,0.155581914,0.17696299,0.155581914,15-43 149th Street,11357,-73.8159779,40.7859159,0.034463499,0.037413249,14231.99992," $2,561.76 ",0.076695322,0 20 | 163 East 111th10029,FirstSpanishMethodistChurch,0.028737942,0.011844349,0.041883796,0.052097976,0,0.1831585,0.128373377,0.1831585,0.128373377,163 East 111th,10029,-73.9435705,40.7954688,0.026579926,0.049353312,18773.99988," $3,379.32 ",0.095406844,0 21 | 145-01 Farmers Blvd11434,SpringfieldGardensChurchoftheNazarene_-_Church,0.06288432,0.117634736,0.018897876,0.007050149,0,0.117994743,0.163165003,0.117994743,0.163165003,145-01 Farmers Blvd,11434,-73.7670999,40.6661182,0.084783807,0.033288644,12663.00018," $2,279.34 ",-0.010665246,0 22 | 145-07 Farmers Blvd11434,SpringfieldGardensChurchoftheNazarene_-_Parsonage,0.126857326,0.09287995,0.060230396,0.009879803,0,0.071484147,0.17898181,0.071484147,0.17898181,145-07 Farmers Blvd,11434,-73.7671221,40.666011,0.141475569,0.033257098,12651.00008," $2,277.18 ",0.064417915,0 23 | 154 Sterling Street11225,GraceandMercyChristianNationalChurch,0.103223694,0.070936862,0.076335571,0.193365997,0,0.064889373,0.003750436,0.064889373,0.003750436,154 Sterling Street,11225,-73.955813,40.662573,0.102992742,0.020423239,7769.000116," $1,398.42 ",0.019912119,0 24 | 111-17 Sutphin Blvd.11435,ChurchofGodMissionInternational,0.011096794,0.014134568,0.006137437,0.083699033,0,0.206200359,0.087946314,0.206200359,0.087946314,111-17 Sutphin Blvd.,11435,-73.7952443,40.6881634,0.013600597,0.008264984,3143.999914, $565.92 ,0.026982454,0 25 | 90-12 160th Street11432,BethanyFrenchBaptistChurch,0.106647369,0.14218736,0.000409341,0.375584153,2,0.033199074,-0.19342011,0.033199074,-0.19342011,90-12 160th Street,11432,-73.7998407,40.7048201,0.124954429,0.108123028,41129.99985," $7,403.40 ",0.05506917,1 26 | 19-20 Mott Avenue Suite 411691,RockawayYouthTaskForce,0.156025186,0.07990648,0.076335571,0.193365997,0,0.026722106,0.009625734,0.026722106,0.009625734,19-20 Mott Avenue Suite 4,11691,-73.7542593,40.604673,0.086481954,0.031180336,11860.99981," $2,134.98 ",0.011983587,0 27 | 316 Saratoga Avenue11233,ReshapingLivesMinistries,0.057720179,0.04709673,0.076335571,0.193365997,0,0.107187326,-6.80E-05,0.107187326,-6.80E-05,316 Saratoga Avenue,11233,-73.9169372,40.6747591,0.041670393,0.039813354,15144.99986," $2,726.10 ",0.040075928,0 28 | 2135-37 Third Ave10035,ChurchofGodofThirdAvenue,0.049738388,0.043689478,0.031761181,0.239152326,0,0.129927609,-0.054419777,0.129927609,-0.054419777,2135-37 Third Ave,10035,-73.9394039,40.7983018,0.05495212,0.101133018,38471.00005," $6,924.78 ",0.178846776,0 29 | 215-31 99th Street11429,FirstRevelationChurch,0.084994665,0.086485278,0.014934024,0.317264038,0,0.080257228,-0.132382901,0.080257228,-0.132382901,215-31 99th Street,11429,-73.742982,40.714861,0.093814558,0.091324921,34739.99995," $6,253.20 ",0.082602161,0 30 | 40 Washington St.11550,UnitedMethodistChurchofHempstead-Church,0.026471265,0.043339991,0.027542913,0.146486126,0,0.15992971,0.031403996,0.15992971,0.031403996,40 Washington St.,11550,-73.6203357,40.7077325,0.007771879,0.025039432,9524.999933," $1,714.50 ",0.216152674,0 31 | 112 Long Drive11550,UnitedMethodistChurchofHempstead-Parsonage,0.094338142,0.211619186,0.076335571,0.193365997,0,-0.011706561,-0.008225403,-0.011706561,-0.008225403,112 Long Drive,11550,-73.636596,40.701459,0.049090528,0.02079653,7911.000012," $1,423.98 ",0.028834576,0 32 | 40 Washington St.11550,UnitedMethodistChurchofHempstead-ParishHall,0.078021195,0.044549643,0.022829236,0.121453334,0,0.132990193,0.060931491,0.132990193,0.060931491,40 Washington St.,11550,-73.6203357,40.7077325,0.007771879,0.183215037,69695.00007," $12,545.10 ",0.293346834,0 33 | 422 Dean Street11217,Immanual-FirstSpanishUMC-Parsonage,0.029678638,0.009405147,0.076335571,0.193365997,0,0.146682074,-0.000643849,0.146682074,-0.000643849,422 Dean Street,11217,-73.9773017,40.6822255,0.028375258,0.012276551,4670, $840.60 ,0.046691668,0 34 | 424 Dean Street11217,Immanuel-FirstSpanishUMC-Church,0.010258116,0.005815633,0.076335571,0.193365997,0,0.160889679,-0.002782355,0.160889679,-0.002782355,424 Dean Street,11217,-73.9772095,40.6821432,0.010530239,0.017084648,6499.000099," $1,169.82 ",0.149896734,0 35 | 590 New Lots Ave11207,PilgrimCathedralofEastNewYork,0.02335858,0.003491084,0.014293037,0.21750887,0,0.181660562,-0.037342189,0.181660562,-0.037342189,590 New Lots Ave,11207,-73.8869517,40.6642448,0.022771094,0.029555731,11243.00007," $2,023.74 ",0.113020703,0 36 | 1746 Broadway11207,WaysideBaptistChurch,0.208855227,0.116747791,0.020178905,0.629740645,2,-0.061719174,-0.420271752,-0.061719174,-0.420271752,1746 Broadway,11207,-73.9107046,40.6828091,0.186082488,0.349474238,132940.0001," $23,929.20 ",0.180872789,1 37 | 1726 Broadway11207,WaysideBaptistChurch-ManorBuilding,0.067606076,0.039023169,0.009346627,0.007036102,0,0.165724432,0.167834168,0.165724432,0.167834168,1726 Broadway,11207,-73.9111129,40.6832655,0.051123075,0.208622503,79360.00014," $14,284.80 ",0.217401446,0 38 | 211 South 4th Street11211,ElPuente,0.095956295,0.035000281,0.013827059,0.401279743,2,0.092085727,-0.208488563,0.092085727,-0.208488563,211 South 4th Street,11211,-73.9596247,40.7109366,0.078840773,0.1179653,44874.00012," $8,077.32 ",0.238098181,1 39 | 171 W. 140th St.10030,NewMtZionBaptistChurch,0.193115849,0.154275395,0.005029637,0.12536487,0,0.005488818,0.059250833,0.005488818,0.059250833,171 W. 140th St.,10030,-73.9406397,40.8184082,0.213024967,0.131335436,49959.99985," $8,992.80 ",0.031012666,0 40 | 166a 22nd Street11212,UPROSE,0.100204857,0.188940596,0.04397547,0.565721688,2,-0.038900262,-0.372482976,-0.038900262,-0.372482976,166a 22nd Street,11212,-73.9967348,40.6623401,0.133493047,0.067381703,25631.99982," $4,613.76 ",0.065448527,1 41 | 165 Humboldt St.11206,InglesiaPentecostalRosadeSaron,0.049124224,0.006570526,0.076335571,0.193365997,0,0.136209574,0.001994166,0.136209574,0.001994166,165 Humboldt St.,11206,-73.941727,40.707105,0.045852353,0.017697161,6732.000044," $1,211.76 ",0.027089442,0 42 | 7033 Amboy Road10307,BethelUnitedMethodistChurch,0.050819642,0.017809709,0.019151929,0.006322685,0,0.183778431,0.17013422,0.183778431,0.17013422,7033 Amboy Road,10307,-74.2347349,40.5155411,0.051485491,0.035770242,13607.00006," $2,449.26 ",0.000926707,0 43 | 102 Manhattan Ave11206,ElLiriodelosValles,0.148009781,0.072794961,0.023059663,0.188023201,0,0.063267535,0.003153065,0.063267535,0.003153065,102 Manhattan Ave,11206,-73.944397,40.705923,0.027765221,0.015015773,5712.000049," $1,028.16 ",0.049276375,0 44 | 86-06 108th St11418,TrinityUMCEastRichmondHill,0.080831417,0.068106918,0.076335571,0.193365997,0,0.080506877,0.001183559,0.080506877,0.001183559,86-06 108th St,11418,-73.8405633,40.6976682,0.081854289,0.022429022,8531.999969," $1,535.76 ",0.029317504,0 45 | 86-06 108th St11418,TrinityUMCEastRichmondHill-Parsonage,0.004195454,0.003883969,0.076335571,0.193365997,0,0.165798542,-0.003387276,0.165798542,-0.003387276,86-06 108th St,11418,-73.8405633,40.6976682,0.081854289,0.001671924,635.9998896, $114.48 ,0.039249591,0 46 | 61 Rivington St.10002,TheLambsChurchoftheNazarene,0.0347443,0.05350733,0.044623453,0.157373367,0,0.1387464,0.024710704,0.1387464,0.024710704,61 Rivington St.,10002,-73.9903129,40.7204745,0.043761211,0.076750789,29196.00014," $5,255.28 ",0.132275453,0 47 | 399 Rockaway Ave11212,HisMajestyInternationalFellowship,0.145170505,0.064874833,0.02477571,0.072848032,0,0.085183945,0.115108026,0.085183945,0.115108026,399 Rockaway Ave,11212,-73.910594,40.670333,0.092395188,0.041640379,15840.00017," $2,851.20 ",0.031185957,0 48 | 2849 W 17th St11224,ChristianMissionofStJohn316,0.14080254,0.122103776,0.004078445,0.25728123,0,0.038613458,-0.072489564,0.038613458,-0.072489564,2849 W 17th St,11224,-73.984654,40.577725,0.086072466,0.038480547,14638.00008," $2,634.84 ",0.03154553,0 49 | 1424 Fulton Street11216,ElgantoLLC,0.029660242,0.013728721,0.030101849,0.158735947,0,0.172208043,0.022784752,0.172208043,0.022784752,1424 Fulton Street,11216,-73.9437344,40.679904,0.031058857,0.016125131,6133.999832," $1,104.12 ",0.050085582,0 50 | 2672 Broadway10025,"4-1_Vision_Education_Media,_LLC_-_NYSERDA_Energy_Assessment_Report",0.148009781,0.072794961,0.076335571,0.193365997,0,0.035873087,0.009178142,0.035873087,0.009178142,2672 Broadway,10025,-73.9687981,40.7982465,0.171351075,0.038611987,14687.99985," $2,643.84 ",0.102102964,0 51 | 59 Wright Street10304,NYSERDA_Energy_Assessment_Report_-_Central_Family_Life_Center,0.074910183,0.09565366,0.030938652,0.187531812,0,0.091641864,-0.005576771,0.091641864,-0.005576771,59 Wright Street,10304,-74.0783546,40.6274602,0.069753311,0.150893796,57400," $10,332.00 ",0.140045349,0 52 | 547 Nostrand Ave11216,FlowerWorksdbaJaricanFlorist,0.068892031,0.031591017,0.05369348,0.230933418,0,0.11524994,-0.038550802,0.11524994,-0.038550802,547 Nostrand Ave,11216,-73.949474,40.6787873,0.07218374,0.025764984,9800.999914," $1,764.18 ",0.015501963,0 53 | 118 W 95th Street10018,CongregationOhabZedekSynagogue,0.247303428,0.244597867,0.04217742,0.096238836,0,-0.095470328,0.094969849,-0.095470328,0.094969849,118 W 95th Street,10018,-73.9690248,40.7923735,0.290053284,0.410304942,156079.9999," $28,094.40 ",0.102287229,0 54 | 173-01 108th Ave11433,4-203-236-StPaulUMC-Church,0.062714523,0.06868015,0.03943731,0.275925935,0,0.098176773,-0.088672092,0.098176773,-0.088672092,173-01 108th Ave,11433,-73.782794,40.700289,0.024013304,0.031600946,12020.99986," $2,163.78 ",0.091012091,0 55 | 141 West 115th Street10026,MemorialBaptistChurch,0.131636782,0.026451239,0.006798486,0.06752404,0,0.125802717,0.117764127,0.125802717,0.117764127,141 West 115th Street,10026,-73.9520856,40.8023865,0.127249169,0.152684017,58081.00007," $10,454.58 ",0.064535536,0 56 | 976 Park Place11213,AnchorHouse-ParkPl,0.611094914,0.445722173,0.186123337,0.233742672,3,-0.531299129,0.021997308,-0.531299129,0.021997308,976 Park Place,11213,-73.9451961,40.6729456,0.57894899,0.475394322,180840.0001," $32,551.20 ",0.323269619,1 57 | 162-02 Highland Ave11432,FirstUMCofJamaica-Church,0.041558249,0.045669262,0.032615968,0.013421099,0,0.165547924,0.162795548,0.165547924,0.162795548,162-02 Highland Ave,11432,-73.7955014,40.7117876,0.05009617,0.083806519,31879.99983," $5,738.40 ",0.06739626,0 58 | 162-02 Highland Ave11432,FirstUMCofJamaica-Parsonage,0.026744364,0.029426505,0.002246327,0.213167304,0,0.171046581,-0.037258415,0.171046581,-0.037258415,162-02 Highland Ave,11432,-73.7955014,40.7117876,0.05009617,0.015628286,5944.999994," $1,070.10 ",0.059239676,0 59 | 162-02 Highland Ave11432,FirstUMCofJamaica-EdBuilding,0.044741142,0.049171275,0.056549957,0.013768023,0,0.149503378,0.167612492,0.149503378,0.167612492,162-02 Highland Ave,11432,-73.7955014,40.7117876,0.05009617,0.121532597,46230.9999," $8,321.58 ",0.139144835,0 60 | 1041 Bergen St.11216,AnchorHouse-BergenSt,0.311512429,0.464248806,0.196247911,0.58403966,2,-0.410155785,-0.35319473,-0.410155785,-0.35319473,1041 Bergen St.,11216,-73.9519127,40.6763333,0.393803516,0.447528917,170240," $30,643.20 ",0.318612031,1 61 | 200-08 Murdock Ave11412,GraceUMCofStAlbans-Church,0.131873752,0.088835456,0.017916684,0.35794058,2,0.04237244,-0.16542696,0.04237244,-0.16542696,200-08 Murdock Ave,11412,-73.754153,40.699882,0.136266339,0.221427445,84231.00008," $15,161.58 ",0.1695706,1 62 | 200-08 Murdock Ave11412,GraceUMCofStAlbansParsonage,0.068087713,0.073325275,0.023926269,0.240173014,0,0.104952733,-0.05705938,0.104952733,-0.05705938,200-08 Murdock Ave,11412,-73.754153,40.699882,0.136266339,0.021004206,7989.999962," $1,438.20 ",0.033913123,0 63 | 456 Nostrand Ave11216,HarrietTubmanFannieLouHamerCollectivedbaSistasPlace,0.148009781,0.072794961,0.076335571,0.193365997,0,0.035873087,0.009178142,0.035873087,0.009178142,456 Nostrand Ave,11216,-73.9504883,40.683373,0.166491329,0.021009464,7992.000106," $1,438.56 ",0.004916734,0 64 | 51 Cottage Place10302,ReachOutAndTouchMinistriesReport,0.012535264,0.011823406,0.049136383,0.210055301,0,0.167186324,-0.024809022,0.167186324,-0.024809022,51 Cottage Place,10302,-74.1304489,40.6358099,0.014359785,0.009319138,3545.000095, $638.10 ,0.064862405,0 65 | 150 Tompkins Ave11206,AbengCenter,0.146406718,0.084781319,0.076335571,0.193365997,0,0.02987461,0.008052542,0.02987461,0.008052542,150 Tompkins Ave,11206,-73.9463324,40.6939713,0.096087944,0.011259201,4283.00006, $770.94 ,-0.003231049,0 66 | 408 Marcus Garvey Blvd11216,HouseofArtGallery,0.046008421,0.057460809,0.076335571,0.193365997,0,0.108440439,-0.002325715,0.108440439,-0.002325715,408 Marcus Garvey Blvd,11216,-73.9382722,40.6828827,0.03609187,0.012492114,4752.000166, $855.36 ,0.000316803,0 67 | 820 Stanley Ave11207,SouthernBaptistChurch,0.052583439,0.214894734,0.01714361,0.13655501,0,0.050093425,0.028812131,0.050093425,0.028812131,820 Stanley Ave,11207,-73.8789519,40.6612169,0.050108107,0.099263933,37760.00011," $6,796.80 ",0.145120575,0 68 | 49-55 Edgecombe Ave10030,StMarksUnitedMethodistChurch,0.135877606,0.058120379,0.009718831,0.088079378,0,0.100284585,0.096587864,0.100284585,0.096587864,49-55 Edgecombe Ave,10030,-73.9468347,40.8186253,0.019502513,0.08966877,34110.00011," $6,139.80 ",0.412733914,0 69 | 239 W 139th Street10030,StMarksUnitedMethodistChurch-Parsonage,0.064058023,0.232649607,0.149063655,0.214149543,0,-0.044415798,-0.018432517,-0.044415798,-0.018432517,239 W 139th Street,10030,-73.943372,40.81874,0.016142322,0.011916404,4533.000082, $815.94 ,0.090536736,0 70 | 111-113 Vermilyea Avenue10034,NYSERDA_Energy_Assessment_Report_-_Spanish_Van_Dyckman_SDA_Church,0.148009781,0.072794961,0.076335571,0.193365997,0,0.035873087,0.009178142,0.035873087,0.009178142,111-113 Vermilyea Avenue,10034,-73.9216714,40.8661132,0.140010555,0.11500617,43748.34707," $7,874.70 ",0.132528224,0 71 | 46-19 206th Street11361,CommunityBaptistChurch,0.06944348,0.377547307,0.01523086,1,2,-0.177223239,-0.816721992,-0.177223239,-0.816721992,46-19 206th Street,11361,-73.7755258,40.7557625,0.147371357,0.057649842,21929.9999," $3,947.40 ",0.1889253,1 72 | 975 St. Nicholas Ave.10032,NYSERDA_Energy_Assessment_Report_-_AME_Zion_Church_on_the_Hill,0.148009781,0.072794961,0.076335571,0.193365997,0,0.035873087,0.009178142,0.035873087,0.009178142,975 St. Nicholas Ave.,10032,-73.9404561,40.8341956,0.130693875,0.539789695,205336," $36,960.48 ",0.327942026,0 73 | 59-61 W. 137th St.10037,RendallMemorialPresbyterianChurch,0.033911807,0.052338766,0.002645044,0.248719461,0,0.147943852,-0.072420491,0.147943852,-0.072420491,59-61 W. 137th St.,10037,-73.9388203,40.8151905,0.011188676,0.014195584,5400.000154, $972.00 ,0.071811431,0 74 | 102 Commerce Street11231,NYSERDA_Energy_Assessment_Report_-_The_CHS_Group,0.139766981,0.072097306,0.008467915,0.039943098,0,0.097169464,0.142260595,0.097169464,0.142260595,102 Commerce Street,11231,-74.0088817,40.6815226,0.090387167,0.16294164,61982.99986," $11,156.94 ",0.133196511,0 75 | 584 bay Street10304,NYSERDA_Energy_Assessment_-_Island_Bay_Grill_and_Lounge,0.189875618,0.084176392,0.178812659,0.268982375,0,-0.058867937,-0.038065251,-0.058867937,-0.038065251,584 bay Street,10304,-74.0764021,40.6275215,0.22323004,0.080483701,30615.99986," $5,510.88 ",0.0420729,0 76 | 230 Decatur Street11230,MountLebanonBaptistChurch,0.161156242,0.161685892,0.017230509,0.087952535,0,0.020315063,0.093430303,0.020315063,0.093430303,230 Decatur Street,11230,-73.9339499,40.6810893,0.188990157,0.255520505,97200.0001," $17,496.00 ",0.076997158,0 77 | 17-31 Seagrit Blvd.11691,SouthIslandMedicalAssociates,0.101173973,0.127820946,0.076335571,0.193365997,0,0.032955875,-0.000899967,0.032955875,-0.000899967,17-31 Seagrit Blvd.,11691,-73.7523365,40.5947466,0.124364356,0.078467403,29849.0001," $5,372.82 ",0.06476165,0 78 | 1817 Mott Avenue11691,NYSERDA_Energy_Assessment_-_DAC_Unisex_Beauty_Salon,0.219683153,0.310161867,0.147396514,0.301816385,2,-0.198362967,-0.090157059,-0.198362967,-0.090157059,1817 Mott Avenue,11691,-73.753855,40.6047334,0.267043383,0.038512093,14650.00018," $2,637.00 ",0.058182174,1 79 | 112-30 Beach Channel Drive11694,NYSERDA_Energy_Assessment_-_Nelly's_Nails_and_More,0.139020453,0.205806561,0.029148899,0.559928234,2,-0.064719066,-0.366471401,-0.064719066,-0.366471401,112-30 Beach Channel Drive,11694,-73.8636374,40.5751461,0.168098189,0.045454784,17290.99983," $3,112.38 ",0.06936669,1 80 | 112-30 Beach Channel Drive11694,JohnLeporeInsuranceAgencyInc,0.123418053,0.090257739,0.148800093,0.294116436,0,-0.00954138,-0.07740219,-0.00954138,-0.07740219,112-30 Beach Channel Drive,11694,-73.8636374,40.5751461,0.168098189,0.040462671,15392.00005," $2,770.56 ",0.085333756,0 81 | 7508 Beach Channel Drive116992,NYSERDA_Energy_Assessment_-_Pilgrim_Church_of_Arverne,0.100113298,0.121483912,0.004809373,0.243427739,0,0.065956476,-0.063958114,0.065956476,-0.063958114,7508 Beach Channel Drive,116992,-73.8356758,40.582635,0.029977568,0.042292324,16088.00005," $2,895.84 ",0.102925639,0 82 | 171 Avenue C10009,NYSERDA_Energy_Assessment_-_1011_Tavern_Corp_-_Evelyn,0.520249569,0.284421064,0.076335571,0.193365997,3,-0.319837284,0.039131571,-0.319837284,0.039131571,171 Avenue C,10009,-73.9776141,40.7263725,0.547300198,0.088796004,33777.99992," $6,080.04 ",0.024704926,1 83 | 1720 Ave J11230,CongregationKnessethBaisYaakov,0.466720144,0.382674561,0.008220681,0.248369478,3,-0.317587371,-0.042595765,-0.317587371,-0.042595765,1720 Ave J,11230,-73.958697,40.62523,0.140010555,0.11500617,43748.34707," $7,874.70 ",0.079107015,1 84 | 9.18E+14,TheStarPeople'sLaundromat,0.204688456,0.135965749,0.95766219,0.230649325,3,-0.482268186,0.160415995,-0.482268186,0.160415995,9176135257,10302,-74.131907,40.6360389,0.184469559,0.059858044,22769.99994," $4,098.60 ",0.23084019,1 85 | 117 Wright Street10304,FirstCentralBaptistChurch,0.062953609,0.07136085,0.003471107,0.057111673,0,0.145561614,0.115116349,0.145561614,0.115116349,117 Wright Street,10304,-74.0797014,40.6282664,0.042562887,0.073659306,28020," $5,043.60 ",0.112696604,0 86 | 758 Arthur Kill Road10312,CAAABagels,1,0.997882448,1,0.108745418,1,-1.48533564,0.319483273,-1.48533564,0.319483273,758 Arthur Kill Road,10312,-74.166282,40.5597809,0.9034585,0.244300736,92931.99997," $16,727.76 ",0.204276699,1 87 | 112-20 beach Channel Drive11694,NYSERDA_Energy_Assessment_Report_-_World_Champions_Karate,0.077888926,0.080990578,0.048186403,0.155218477,0,0.094317762,0.030785564,0.094317762,0.030785564,112-20 beach Channel Drive,11694,-73.8357699,40.5827587,0.088107911,0.015883281,6042.000092," $1,087.56 ",0.023227648,0 88 | 241 Beach 116th Street #111694,PaninicoCafeReport,0.844713519,1,0.654870041,0.447673382,1,-1.265381996,-0.100116369,-1.265381996,-0.100116369,241 Beach 116th Street #1,11694,-73.8379319,40.5804826,1,0.144216614,54859.99997," $9,874.80 ",0.194025868,1 89 | 239 Beach 116th Street11694,Curran'sSuperiorMeatsReport,0.715080169,0.717029609,0.270809469,0.143086385,3,-0.783999328,0.119390155,-0.783999328,0.119390155,239 Beach 116th Street,11694,-73.8378233,40.5805242,0.809332847,0.145899054,55500.00014," $9,990.00 ",0.081179157,1 90 | 239 Beach 116th Street11694,Sigma_AlphaLLCReport,0.080060654,0.192746649,0.076335571,0.193365997,0,0.008216533,-0.00854321,0.008216533,-0.00854321,239 Beach 116th Street,11694,-73.8378233,40.5805242,0.809332847,0.010533649,4007.00008, $721.26 ,0.040899518,0 91 | 375 Beach 92nd Street11693,ThaiRock,0.21595866,0.175909553,0.085294305,0.336276546,2,-0.091510229,-0.126601734,-0.091510229,-0.126601734,375 Beach 92nd Street,11693,-73.817115,40.5887325,0.237178272,0.256537855,97587.00004," $17,565.66 ",0.132115039,1 92 | 132 W 134th Street10030,SaintJohnAMEChurch,0.072312773,0.184637979,0.016264122,0.092694295,0,0.062131655,0.07581822,0.062131655,0.07581822,132 W 134th Street,10030,-73.9433814,40.8140753,0.030930808,0.025604627,9740.000111," $1,753.20 ",0.024196691,0 93 | 1332 Central Avenue11691,ArverneChurchofGod-COGCA,0.198862876,0.171218038,0.031958148,0.23536139,0,-0.037092877,-0.042017223,-0.037092877,-0.042017223,1332 Central Avenue,11691,-73.7491396,40.6075143,0.133405925,0.196529968,74759.99983," $13,456.80 ",0.235872265,0 94 | 1318 Central Avenue11691,ArverneChurchofGod,0.177692929,0.132626833,0.064107116,0.591351181,2,-0.068057282,-0.379039076,-0.068057282,-0.379039076,1318 Central Avenue,11691,-73.7497946,40.6072579,0.112122209,0.062152997,23643.00006," $4,255.74 ",0.095660489,1 95 | 157 St. Pauls Place11226,SaintPaulsChurch-OfficeAuditorium,0.02565082,0.005482528,0.004477935,0.036712614,0,0.209686777,0.135496891,0.209686777,0.135496891,157 St. Pauls Place,11226,-73.9621723,40.6504518,0.140010555,0.11500617,43748.34707," $7,874.70 ",0.197295226,0 96 | 2115 Albermarle Terrace11226,SaintPaulsChurchRectory,0.019115284,0.003331379,0.011234286,0.10923339,0,0.201327553,0.066165913,0.201327553,0.066165913,2115 Albermarle Terrace,11226,-73.95918,40.648795,0.017624315,0.012505258,4757.000143, $856.26 ,0.068928998,0 97 | 2115 Albermarle Terrace11226,SaintPaulsChurchRectory,0.019115284,0.003331379,0.011234286,0.10923339,0,0.201327553,0.066165913,0.201327553,0.066165913,2115 Albermarle Terrace,11226,-73.95918,40.648795,0.017624315,0.012505258,4757.000143, $856.26 ,0.068928998,0 98 | 2134 Dean Street11233,GloverMemorialBaptistChurch,0.031851697,0.024680627,0.043009816,0.148006679,0,0.159519693,0.03529383,0.159519693,0.03529383,2134 Dean Street,11233,-73.9170051,40.6749107,0.034022416,0.033217666,12636.00015," $2,274.48 ",0.060283879,0 99 | 502 North Central Avenue11580,GatewayChristianCenter,0.072477439,0.079731736,0.00336142,0.000701489,0,0.142811696,0.170160957,0.142811696,0.170160957,502 North Central Avenue,11580,-73.7111511,40.6792129,0.056318228,0.090357518,34371.99985," $6,186.96 ",0.088004627,0 100 | 334 Ashford Street11208,NewTestamentChristianChurch,0.148009781,0.072794961,0.076335571,0.193365997,0,0.035873087,0.009178142,0.035873087,0.009178142,334 Ashford Street,11208,-73.8854697,40.6741827,0.140010555,0.11500617,43748.34707," $7,874.70 ",0.011285591,0 101 | 260 Broadway11211,BrooklynLegalServicesCorpA,0.157626124,0.084391573,0.041709209,0.06981543,0,0.057986546,0.121637544,0.057986546,0.121637544,260 Broadway,11211,-73.95957,40.7086929,0.170715261,0.489752892,186302.0001," $33,534.36 ",0.496610151,0 102 | 599 Washington Ave11236,JesusTheGoodShepherdChurchReport,0.068454795,0.116726792,0.004413315,0.00922192,0,0.12198327,0.158786484,0.12198327,0.158786484,599 Washington Ave,11236,-73.9638333,40.679697,0.046567227,0.043157203,16417.00002," $2,955.06 ",0.095141911,0 103 | 31-86 37th Street11103,LunaNYCafeCorpReport,0.924568579,0.229013427,0.076335571,0.193365997,3,-0.539646348,0.093709225,-0.539646348,0.093709225,31-86 37th Street,11103,-73.920481,40.7600746,0.922420707,0.133028391,50603.99994," $9,108.72 ",0.012264781,1 104 | 161 E 104th Street10029,ChurchoftheLivingHopeReport,0.016849556,0.006109577,0.023181025,0.147211806,0,0.189744904,0.031466231,0.189744904,0.031466231,161 E 104th Street,10029,-73.9465147,40.7908209,0.016656912,0.018301788,6962.000155," $1,253.16 ",0.091716615,0 105 | --------------------------------------------------------------------------------