Skip to content

Instantly share code, notes, and snippets.

Avatar

Saburo Higuchi hig3

View GitHub Profile
@hig3
hig3 / stat_education_workshop_manuscript.tex
Last active Aug 29, 2015
統計教育の方法論ワークショップ http://estat.sci.kagoshima-u.ac.jp/SESJSS/edu2013.html 予稿集(統計数理研究所共同研究リポート)原稿フォーマット http://estat.sci.kagoshima-u.ac.jp/SESJSS/PDF/workshop/Doc_format.pdf これをeditorがA4→B5に縮小すると聞いた気がしたが, 実際は下のをb5paperにした相当のものを提出した講演者が多い.
View stat_education_workshop_manuscript.tex
\documentclass[a4paper]{jarticle}
\usepackage[dvipdfm]{hyperref}
\AtBeginDvi{\special{pdf:tounicode EUC-UCS2}}
\usepackage[dvipdfmx]{graphicx}
\usepackage{multicol}
\setlength{\columnsep}{1cm}
@hig3
hig3 / course_999999_survey_999999.mht
Created Apr 19, 2015
龍谷大学 学生による学期初めの授業アンケート(2015) (to be imported into manaba courseアンケート)
View course_999999_survey_999999.mht
From: <MHT Writer>
Subject: =?UTF-8?Q?=E5=AD=A6=E7=94=9F=E3=81=AB=E3=82=88=E3=82=8B=E5=AD=A6=E6=9C=9F=E5=88=9D=E3=82=81=E3=81=AE=E6=8E=88=E6=A5=AD=E3=82=A2=E3=83=B3=E3=82=B1=E3=83=BC=E3=83=88?=
Date: Sun, 19 Apr 2015 09:02:01 GMT
MIME-Version: 1.0
Content-Type: multipart/related;
boundary="----=_NextPart_000_0000_ED52E1D22.A004CDA26";
type="text/html"
This is a multi-part message in MIME format.
@hig3
hig3 / course_200867_survey_249771.mht
Last active May 20, 2016
学生による学期半ばの授業アンケートA 龍谷大学 manaba course アンケートにインポート
View course_200867_survey_249771.mht
From: <MHT Writer>
Subject: =?UTF-8?Q?=E5=AD=A6=E7=94=9F=E3=81=AB=E3=82=88=E3=82=8B=E5=AD=A6=E6=9C=9F=E5=8D=8A=E3=81=B0=E3=81=AE=E6=8E=88=E6=A5=AD=E3=82=A2=E3=83=B3=E3=82=B1=E3=83=BC=E3=83=88B?=
Date: Fri, 20 May 2016 03:53:18 GMT
MIME-Version: 1.0
Content-Type: multipart/related;
boundary="----=_NextPart_000_0000_DD2AC654B.6EB37980D";
type="text/html"
This is a multi-part message in MIME format.
@hig3
hig3 / course_200867_survey_249766.mht
Last active May 20, 2016
学生による学期半ばの授業アンケートB 龍谷大学 manaba course アンケートにインポート
View course_200867_survey_249766.mht
From: <MHT Writer>
Subject: =?UTF-8?Q?=E5=AD=A6=E7=94=9F=E3=81=AB=E3=82=88=E3=82=8B=E5=AD=A6=E6=9C=9F=E5=8D=8A=E3=81=B0=E3=81=AE=E6=8E=88=E6=A5=AD=E3=82=A2=E3=83=B3=E3=82=B1=E3=83=BC=E3=83=88A?=
Date: Fri, 20 May 2016 03:51:46 GMT
MIME-Version: 1.0
Content-Type: multipart/related;
boundary="----=_NextPart_000_0000_C9DD2AC65.4B6EB3798";
type="text/html"
This is a multi-part message in MIME format.
@hig3
hig3 / feedback.xml
Created May 20, 2016
学生による学期半ばの授業アンケート for Moodle Feedback Module
View feedback.xml
<?xml version="1.0" encoding="UTF-8" ?>
<FEEDBACK VERSION="200701" COMMENT="XML-Importfile for mod/feedback">
<ITEMS>
<ITEM TYPE="label" REQUIRED="0">
<ITEMID>
<![CDATA[2212]]>
</ITEMID>
<ITEMTEXT>
<![CDATA[label]]>
@hig3
hig3 / distpdf.py
Created Sep 14, 2016
一定ページ数の複数文書が連結されたPDFファイルをpdftkで分割して, 標準入力からリストとして与えられたファイル名をつける Python スクリプト
View distpdf.py
# distpdf.py inname outname period start end docopy
# 0 =< start, end < periodb
# Example: distpdf.py in out 3 1 2 0
import sys
import os
import shutil
import re
markdir="./"
@hig3
hig3 / distpdf.bat
Last active Sep 15, 2016
連結された全員分のレポートのPDFを分割して, manaba courseのレポートに代理一括提出するためのzipファイルを作るバッチファイル
View distpdf.bat
@setlocal enabledelayedexpansion
rem 1人当たりのページ数
set delta=5
rem 1人目の開始ページ番号(1ページから数える)
set s=1
rem 1人目の終了ページ番号(1ページから数える)
set e=4
rem 全員分まとめたPDFファイルのファイル名
set source=report_all.pdf
rem 配布するPDFファイルのファイル名(全員共通)
@hig3
hig3 / mkdirfb.py
Created Aug 2, 2017
Python script to make directory structure of feedback files from the offline grading worksheet in Moodle Assignments
View mkdirfb.py
#!/opt/local/bin/python
# mkdirfb.py
# make directories to be zipped for feedback files
# from offline grading worksheet
# of Assignment activity in Moodle
# Usage: cat offlinegradingworksheet.csv | python mkdirfb.py
# Saburo Higuchi
# Time-stamp "2017-08-02 Wed 16:47 JST hig"
@hig3
hig3 / test.php
Last active Sep 13, 2017
test.php
View test.php
<?php
$x1=range(1,3);
$y1=range(1,3);
$x2=range(1,3);
$y2=range(1,3);
condition:ne($y1,$y2);
$ans=maple("x-($x1)=(($x2)-($x1))/(($y2)-($y1))*(y-($y1))");
$ansdisp=maple("print(MathML[ExportPresentation]($ans))");
$grade=maple("proc(A,R) evalb(simplify(solve(A,x)-solve(R,x))=0) end proc;");
$ansplot=plotmaple("plot([solve($ans,x),y,y=-3..3],labels=[x,y])");
@hig3
hig3 / polynomialdivision.mapleta
Last active May 7, 2019
Maple T.A. algorithm variables for polynomial division excercise
View polynomialdivision.mapleta
$a1=range(-3,3);
$b1=range(-3,3);
$b2=range(-3,3);
: no japanese comments
: avoid $b2 being zero. ne=not equal
condition:ne($b2,0);
$p1=maple("x^2+($a1)*x+($b1)");
$p2=maple("x+($b2)");
$ans1=maple("expand(($p1)*($p2),x)");
$ans2=maple("quo(($p1),($p2),x)");
You can’t perform that action at this time.