henrik

tmux cheatsheet

As configured in my dotfiles.

start new:

tmux

start new with session name:

MohamedAlaa

tmux shortcuts & cheatsheet

start new:

tmux

start new with session name:

tmux new -s myname

ryin

#!/bin/bash

# Script for installing tmux on systems where you don't have root access.
# tmux will be installed in $HOME/local/bin.
# It's assumed that wget and a C/C++ compiler are installed.

# exit on error
set -e

TMUX_VERSION=1.8

simnalamburt

Moved to https://github.com/simnalamburt/.dotfiles/blob/main/docs/gpg.md

 

깃 커밋 서명하는법

A. PGP key pair 등록

기존에 원래 사용하던 PGP key pair가 없을경우 새로 만들어야한다. 이미 key pair가 있을경우, 비밀키를 컴퓨터에 다운로드 해줘야한다.

shanmdphd

library(shiny)
library(ggplot2)

dataset <- diamonds

fluidPage(

  titlePanel("PEET2017"),

  sidebarPanel(

shanmdphd

library(ReporteRs)
options('ReporteRs-fontsize' = 10)

potsub <- function(char) pot(char, textProperties(vertical.align = 'subscript'))
potsuper <- function(char) pot(char, textProperties(vertical.align = 'superscript'))
flexThis <- function(df){
  df %>% 
    FlexTable(header.columns = TRUE) %>% 
    setFlexTableBorders(inner.vertical = mystyle$no, inner.horizontal = mystyle$std,
                        outer.vertical = mystyle$no, outer.horizontal = mystyle$big)

shanmdphd

knitr::write_bib(c('caffsim', 'NonCompart', 'ncar'), 'temp.bib')
capture.output(bibtex::read.bib('temp.bib'), file = 'temp.txt')
myBib <- readLines('temp.txt') 
myBib[myBib == ''] <- '\n\n'
paste(gsub('_', '',myBib), collapse = '')

shanmdphd

# http://zeroset.mnim.org/2015/01/07/flatten-pdfs-with-ghostscript/
# https://unix.stackexchange.com/questions/162922/is-there-a-way-to-flatten-a-pdf-image-from-the-command-line

# There should be `flat` sub-directory.

for file in *.pdf; do
	gs -dSAFER -dBATCH -dNOPAUSE -dNOCACHE -sDEVICE=pdfwrite \
	-sColorConversionStrategy=/LeaveColorUnchanged  \
	-dAutoFilterColorImages=true \
	-dAutoFilterGrayImages=true \

shanmdphd

library(dplyr)
library(NonCompart)
tblNCA(Theoph, 
       dose = Theoph %>% 
         mutate(actual_dose = Wt*Dose) %>% 
         select(Subject, actual_dose) %>% 
         unique() %>% 
         .$actual_dose)