Skip to content

Instantly share code, notes, and snippets.

View senthilthyagarajan's full-sized avatar

Senthil Thyagarajan senthilthyagarajan

View GitHub Profile
@senthilthyagarajan
senthilthyagarajan / .block
Last active March 10, 2023 04:08 — forked from curran/.block
Julius Meinl Market Share Study
license: mit
We can't make this file beautiful and searchable because it's too large.
"city","city_ascii","state_id","state_name","county_fips","county_name","county_fips_all","county_name_all","lat","lng","population","density","source","military","incorporated","timezone","ranking","zips","id"
"South Creek","South Creek","WA","Washington","53053","Pierce","53053","Pierce","46.9994","-122.3921","2500","125","polygon","FALSE","TRUE","America/Los_Angeles","3","98580 98387 98338","1840042075"
"Roslyn","Roslyn","WA","Washington","53037","Kittitas","53037","Kittitas","47.2507","-121.0989","947","84","polygon","FALSE","TRUE","America/Los_Angeles","3","98941 98068 98925","1840019842"
"Sprague","Sprague","WA","Washington","53043","Lincoln","53043","Lincoln","47.3048","-117.9713","441","163","polygon","FALSE","TRUE","America/Los_Angeles","3","99032","1840021107"
"Gig Harbor","Gig Harbor","WA","Washington","53053","Pierce","53053","Pierce","47.3352","-122.5968","9507","622","polygon","FALSE","TRUE","America/Los_Angeles","3","98332 98335","1840019855"
"Lake Cassidy","Lake Cassidy","WA","Washington","530
@senthilthyagarajan
senthilthyagarajan / .block
Last active March 4, 2020 20:44 — forked from mikelotis/.block
The Rogue One's
width: 820
height: 730
library(shiny)
library(shinyjs)
## shinysky is to customize buttons
library(shinysky)
library(DT)
library(data.table)
library(lubridate)
library(shinyalert)
@senthilthyagarajan
senthilthyagarajan / styledatatables.r
Last active June 15, 2022 13:34
Style Datatables
library(shiny)
library(DT)
table_frame <-
function() {
htmltools::withTags(table(class = 'display',
thead(
tr(
th(rowspan = 2, 'Latitude'),
th(rowspan = 2, 'Longitude'),
@senthilthyagarajan
senthilthyagarajan / app.R
Created April 18, 2019 17:18
Edit DT with modules
### Libraries
library(shiny)
library(dplyr)
library(DT)
### Data
input_data <- data.frame(Brand = c("Brand1", "Brand2","Brand3"),
ratio = c (.5, .5, .5),
cost = c(2000, 3000, 4000),
stringsAsFactors = FALSE) %>%
@senthilthyagarajan
senthilthyagarajan / index.html
Last active October 3, 2018 17:12 — forked from d3noob/.block
Interactive d3.js tree diagram
<!DOCTYPE html>
<html lang="en">
<head>
<meta charset="utf-8">
<title>Tree Example</title>
<style>
.node {
d3 audio waveforms block
library(shiny)
library(shinydashboard)
library(shinyWidgets)
dropDownUI <- function(id, div_width = "col-xs-12 col-md-8") {
ns <- NS(id)
div(column(3, uiOutput(ns("class_level"))),
column(
library(shiny)
# Define UI ----
ui <- fluidPage(
titlePanel("censusVis"),
sidebarLayout(
sidebarPanel(
helpText("Create demographic maps with
information from the 2010 US Census."),