Skip to content

Instantly share code, notes, and snippets.

##Following libraries need to be installed for running the program
##by using the install.packages(c(“raster”,”rgdal”,”ncdf”,”gdata”))
library(raster)
library(ncdf)
library(rgdal)
library(gdata)
#Using setwd to direct the unzipped .bil files like
setwd(“D:/Weather/PRISM_ppt_stable_4kmD1_20130101_20131231_bil”)
#******************************************************************#
#***function for merge daily data *********************************#
@emraher
emraher / notify.R
Last active March 25, 2016 23:10 — forked from uribo/notify.R
Send OS X notifications from R (RStudio, R GUI or R console) - Requires Terminal Notifier --> brew install terminal-notifier
notify <- function(msg="Operation complete") {
in.osx <- (Sys.info()['sysname'] == "Darwin")
in.rstudio <- (Sys.getenv("RSTUDIO") == "1")
in.rgui <- (Sys.getenv("R_GUI_APP_REVISION") != "")
dir.notifier <- system("which terminal-notifier", intern = TRUE)
if (in.rstudio) { # hack to see if running in RStudio
title <- "RStudio"
sender <- activate <- "org.rstudio.RStudio"
@emraher
emraher / growl.notify.R
Last active April 12, 2016 07:41
Send Growl notifications from R (RStudio, R GUI or R console) - Requires growlnotify / Similar to https://goo.gl/dtP4eH
growl.notify <- function(msg = "Operation complete") {
in.osx <- (Sys.info()['sysname'] == "Darwin")
in.rstudio <- (Sys.getenv("RSTUDIO") == "1")
in.rgui <- (Sys.getenv("R_GUI_APP_REVISION") != "")
dir.notifier <- system("which growlnotify", intern = TRUE)
if (in.rstudio) { # hack to see if running in RStudio
title <- "RStudio"
}
@emraher
emraher / PyFrackETL.py
Created July 12, 2016 09:59 — forked from KhepryQuixote/PyFrackETL.py
Python scripts to download, extract, and output oil, gas, and/or fracking well information from various states in the United States of America.
# -*- coding: utf-8 -*-
'''
This Python script is oriented towards oil, gas, and fracking well
information download, extract, and output at the state-level within
the United States of America. Not all states are present as not all
states either allow fracking or have any sites available for download.
This Python script is dependent upon another Python script entitled
Src2Tgt.py, which is also available as a Gist under the same name.
@emraher
emraher / hdmexample.R
Created October 26, 2017 22:31
hdm example
set.seed(pi)
n <- 1000 #sample size
p <- 1000 # number of variables
s <- 30 # nubmer of non-zero variables
X <- matrix(rnorm(n * p), ncol = p)
colnames(X) <- paste("X", 1:p, sep = "")
beta <- c(rep(3, s), rep(0, p - s))
@emraher
emraher / mode.R
Created November 1, 2017 08:13
Mode function for R
# SEE
# https://myrgiovanni.blogspot.com.tr/2016/07/computing-mode-in-r.html
# https://stackoverflow.com/a/25635740
# https://stackoverflow.com/a/22123729
Mode <- function(x, na.rm = FALSE, mult = TRUE) {
if(na.rm) {
x = x[!is.na(x)]
}
@emraher
emraher / tr.dcf
Created December 23, 2017 08:03
Turkish dcf for R package exams
PersonalData: Ki{\c s}isel Bilgiler
Name: Ad
FamilyName: Soyad
GivenName: Ad
Signature: {\.I}mza
RegistrationNumber: {\"O}{\u g}renci Numaras{\i}
Checked: Kontrol Edilmi{\c s}
NoChanges: Bu b{\"o}l{\"u}mde de{\u g}i{\c s}iklik \textbf{yap{\i}lmamal{\i}d{\i}r}!
DocumentType: T{\"u}r
DocumentID: S{\i}nav Numaras{\i}
@emraher
emraher / spatial.R
Created January 30, 2018 08:03 — forked from devmag/spatial.R
R scripts to compute Conley Type Standard Errors
#####VECTORISED FUNCTION
library(data.table)
library(geosphere)
library(foreign)
library(lfe)
library(reshape)
iterateObs<-function(y1,e1,X1,fordist,coefficients,cutoff=250000) {
@emraher
emraher / disable.sh
Created May 14, 2018 07:38
Disable bunch of #$!@ in Sierra (Version 2.1)
#!/bin/bash
# IMPORTANT: You will need to disable SIP aka Rootless in order to fully execute this script, you can reenable it after.
# WARNING: It might disable things that you may not like. Please double check the services in the TODISABLE vars.
# Get active services: launchctl list | grep -v "\-\t0"
# Find a service: grep -lR [service] /System/Library/Launch* /Library/Launch* ~/Library/LaunchAgents
# Agents to disable
TODISABLE=('com.apple.security.keychainsyncingoveridsproxy' 'com.apple.personad' 'com.apple.passd' 'com.apple.screensharing.MessagesAgent' 'com.apple.CommCenter-osx' 'com.apple.Maps.mapspushd' 'com.apple.Maps.pushdaemon' 'com.apple.photoanalysisd' 'com.apple.telephonyutilities.callservicesd' 'com.apple.AirPlayUIAgent' 'com.apple.AirPortBaseStationAgent' 'com.apple.CalendarAgent' 'com.apple.DictationIM' 'com.apple.iCloudUserNotifications' 'com.apple.familycircled' 'com.apple.familycontrols.useragent' 'com.apple.familynotificationd' 'com.apple.gamed' 'com.apple.icloud.findmydeviced.findmydevi
@emraher
emraher / 1-macOS-10.13-high-sierra-setup.md
Created May 14, 2018 07:40 — forked from kevinelliott/1-macOS-10.13-high-sierra-setup.md
macOS 10.13 High Sierra Mostly-Automated Setup

macOS 10.13 High Sierra Mostly-Automated Setup

An easy to refer to document for regularly setting up macOS 10.13 High Siera, in flavor of my previous macOS/OSX setup gists:

I use this gist to keep track of the important software and steps required to have a functioning system after a semi-annual fresh install. I generally reinstall each computer from scratch every 6 months, and I do not perform upgrades between releases.