Skip to content

Instantly share code, notes, and snippets.

View ryseto's full-sized avatar

Ryohei Seto ryseto

View GitHub Profile
@ryseto
ryseto / gist:4589945
Last active December 11, 2015 10:58
Emacs で編集中のファイルが入っているフォルダ(ディレクトリ)を Finder/Terminal で開く。 ショートカットは ⌘-Shift-Option-F と ⌘-Shift-Option-T。
;;; Finder でフォルダを開く
;; ショートカット: ⌘-option-shift-F
;; (ショートカットは USキーボードで確認)
(define-key global-map [?\s-Ï] 'MyTool-open-folder-in-finder)
(defun MyTool-open-folder-in-finder ()
"open -a Finder.app CURRENT-DIRECTORY"
(interactive)
(process-query-on-exit-flag
(start-process-shell-command "open folder in Finder" nil "open .")))
@ryseto
ryseto / gist:7955308
Last active December 31, 2015 07:39
Open the bibitem in BibDesk.app
(defun MyTeX-open-item-BibDesk ()
"Open the bibitem in BibDesk.app"
(interactive)
(let* ((s (save-excursion
(skip-chars-backward "^{,")
(point)))
(e (save-excursion
(skip-chars-forward "^},")
(point))))
(browse-url (concat "x-bdsk://" (buffer-substring-no-properties s e)))))
@ryseto
ryseto / st_visual.py
Last active January 4, 2016 06:09
visualization of 2d sheared particles by using vpython
#/Applications/VPython-Py2.7/VIDLE.app/Contents/MacOS/Python
# coding=utf-8
from visual import *
import numpy
import sys
fin = open(sys.argv[1])
scene = display(title='Simple Shear',
width=1100, height=800,
@ryseto
ryseto / skim-forward-search.el
Last active November 12, 2018 14:35
Emacs から Skim.app で開いている PDF の編集位置を表示させる関数(YaTeX 1.78 以降は標準のジャンプ機能で対応している)
;;; Tsuchiya-san's corrections (yatex ML [yatex:04810,04811])
(defun skim-forward-search ()
(interactive)
(process-query-on-exit-flag
(start-process
"displayline"
nil
"/Applications/Skim.app/Contents/SharedSupport/displayline"
(number-to-string (save-restriction
(widen)
@ryseto
ryseto / .gnuplot
Last active August 25, 2020 01:29
set terminal qt
tg_L=0
bind "L" "tg_L=tg_L+1;if(tg_L%2)set logs;replot; else unset logs;replot;"
tg_k=1
bind "k" "tg_k=tg_k+1;if(tg_k%2)set key;replot; else unset key;replot;"
tg_l=0
bind "-" "tg_l=tg_l+1;if(tg_l%2)set style data lp;replot; else set style data p;replot;"
bind "O" "set term post eps color enhanced 18;set out 'tmp_gnuplot.eps';replot;set term qt;
bind "P" "! open -a Preview tmp_gnuplot.eps;"
@ryseto
ryseto / Covid19-slope.nb
Last active July 22, 2021 08:57
Covid19 slope
worlddata =
Import["https://covid.ourworldindata.org/data/owid-covid-data.csv"];
font = "Helvetica Neue";
slopeangle = Pi/6;
pos0 = {0, 0};
radius = Log[10]/Pi;
slopepos[val_, h_] :=
pos0 + {Cos[slopeangle]*val +
h*Sin[slopeangle], (-Sin[slopeangle])*val + h*Cos[slopeangle]}