Skip to content

Instantly share code, notes, and snippets.

View mrchypark's full-sized avatar

ChanYub Park mrchypark

View GitHub Profile
"""A simple implementation of a greedy transition-based parser. Released under BSD license."""
from os import path
import os
import sys
from collections import defaultdict
import random
import time
import pickle
SHIFT = 0; RIGHT = 1; LEFT = 2;
# -*- coding: utf-8 -*-
from __future__ import unicode_literals
from gevent import monkey; monkey.patch_all()
import re
from urlparse import urljoin
from gevent.pool import Pool
import requests
@mrchypark
mrchypark / Google Insights.R
Created January 5, 2016 01:31 — forked from knoepfle/Google Insights.R
fetch a CSV file from a Google Insights search
#########################################
## GLOBAL REQUIREMENTS AND DEFINITIONS ##
#########################################
require(RCurl)
require(XML)
loginURL <- "https://accounts.google.com/ServiceLogin"
authenticateURL <- "https://accounts.google.com/accounts/ServiceLoginAuth"
insightsURL <- "http://www.google.com/insights/search/overviewReport"
@mrchypark
mrchypark / docker_cheat.md
Created October 14, 2016 11:59 — forked from nacyot/docker_cheat.md
도커(Docker) 치트 시트

Docker 치트 시트

한국어 번역(초벌) : nacyot

왜 Docker를 사용해야하는가?

Why Should I Care (For Developers)

"나에게 Docker의 매력은 간단히 격리된 환경을 만들 수 있다는 것과, 그러한 환경을 재사용할 수 있다는 점이다."런타임 환경을 한 번 만들어 패키지로 만들면, 이 패키지를 다른 어떤 머신에서도 다시 사용할 수 있다. 또한 여기서 실행되는 모든 것은 마치 가상머신과 같이 호스트로부터 격리되어있다. 무엇보다도 이런 모든 일들이 빠르고 간단히 가능하다.

library(e1071)
library(kernlab)
library(data.table)
library(randomForest)
library(caret)
tra1<-fread("total.train.1.csv")
tra2<-fread("total.train.2.csv")
tes1<-fread("total.test.1.csv")
tes2<-fread("total.test.2.csv")
@mrchypark
mrchypark / test.R
Created January 16, 2017 11:53
수업 떄문에 함
# Read a CSV file
# Classify the column types
# Determine measures and dimensions
# Generate meta data and store JSON
# Query Solr and store the information in SOLR
# Save the data as cache
# Author: Jitender Aswani, Co-Founder @datadolph.in
# Date: 3/15/2013
# Copyright (c) 2011, under the Creative Commons Attribution-NonCommercial 3.0 Unported (CC BY-NC 3.0) License
@mrchypark
mrchypark / app.R
Created March 14, 2017 06:13 — forked from kkweon/app.R
Top 포탈 키워드
library(shiny)
library(gsheet)
# Helper Functions
read.list <- function(url = "https://docs.google.com/spreadsheets/d/1aJ2Bv8CCR4OhBoVdsQD16OWON89VwuaLYKDDP-OiTG4") {
as.data.frame(gsheet::gsheet2tbl(url))
}
read.data <- function(url) {
data <- as.data.frame(gsheet::gsheet2tbl(url))
# 샘플 데이터를 만듬
testData <- data.frame(LET=sample(LETTERS,1000,replace = T),
NUM=sample(1:10,1000,replace = T),
stringsAsFactors = F)
# 데이터를 확인함
head(testData,100)
# 정렬된 데이터를 확인함
install.packages("data.table")
library(data.table)
# loading packages
library(dplyr)
library(tidyr)
library(igraph)
# set sample data set
options(stringsAsFactors = F)
exd<-data.frame(comp=sample(LETTERS),
partner1=sample(LETTERS),