so-c

function getClientInfo() {
  return {
    "name": SV.T("Pronounce Hiragana with Chinese Voice"),
    "author": "SO_C",
    "versionNumber": 1.2,
    "minEditorVersion": 65537
  };
}

function getTranslations(langCode) {

so-c

var SCRIPT_TITLE = "Change Track Color";

function getClientInfo() {
    return {
        "name": SV.T(SCRIPT_TITLE),
        "author": "so-c",
        "versionNumber": 1,
        "minEditorVersion": 65537
    };
}

so-c

digraph production_science_pack {
    size="20, 20";
    bgcolor = "transparent";
    rankdir = TD;
    ranksep = 0.3
    node [colorscheme="paired12", shape=box, style="rounded, filled", fontname = "Yu Gothic UI, Segoe UI"];
    edge [color="/X11/dimgrey", fontname = "Yu Gothic UI, Segoe UI", fontsize=10]

    "ユーティリティSP"[color = 11]

so-c

dat <- tribble(~uta,  ~fude, ~sumi, ~kami,
               52700, 14,    10,    14,
               46500, 16,    16,    22,
               52700, 12,    16,    14,
               57040, 18,    12,    16,
               38440, 14,    22,    12,
               48980, 14,    10,    14,
               46980,  8,    14,    12,
               47740, 20,    20,    12,
               31000, 16,     8,    16,

so-c

void setup() {
  size(800, 600);
  background(255);

  stroke(119, 117, 173);
  drawTree(width/2, height, 100, 0, 12);

  save("fractal-tree.png");

  println("done!");

so-c

// 選択行に連番を降るサクラエディタマクロ
autoFill = (function(){
  var i = 0,
      lines = '',
      firstLine = 0,
      length = 0,
      digit = 0;

  lines = Editor.GetSelectedString(/* API仕様の固定値 */0);
  if (lines === '') {

so-c

<redpen-conf lang="ja">
    <validators>
        <!--Rules on sentence length-->
        <validator name="SentenceLength">
            <property name="max_len" value="100"/>
        </validator>
        <validator name="CommaNumber" />

        <!--Rules on expressions-->
        <validator name="ParagraphNumber"/>

so-c

# 『関数プログラミング実践入門』のリストモナドの例をRで実装してみる。
# Rはベクトルが基本計算単位だから、常にリストモナドみたいなものだと思いついたので、その確認。

# lessThanは見た目も近い
lessThan <- function(n) {
  0:(n-1)
}

# plusMinusもほぼ同様。
plusMinus <- function(a, b) {

so-c

/*
 * 台詞を発言者を現すクラスを指定したタグで括る。
 * 事前条件：双司の台詞と希の台詞が空行を挟んで交互に並んでいること。
 * 
 * 1:双司の台詞
 * 2:空行
 * 3:希の台詞
 * ...
 * 2n+1: 双司の台詞
 * 2n+2: 空行

so-c

library("tidyverse")

raw.entries <- data.frame(年=factor(c(2012, 2013, 2014, 2015, 2016)),
                          小説=c(69, 65, 71, 65, 90),
                          読書=c(34, 48, 24, 30, 21),
                          新書=c(3, 2, 9, 5, 4),
                          漫画=c(17, 44, 67, 80, 97))

entries <- raw.entries %>% gather(ラベル, 冊数, -年)