V-antena and Tanimoto's page

谷本の備忘録・雑記帳・work

>

月: 2016年4月

MONTHLY ARCHIVE

JAVAでのトラブルシューティングで参考となるサイト

1.Remote debug
'http://labs.timedia.co.jp/2011/03/jvm-eclipse-remotedebug.html
'http://qiita.com/san_yamagami/items/12864f6c1a134261072a
2.Heap memory monitor
// visualVM and jstatd
'http://qiita.com/maaru/items/7abdda94f69fbf029e17
'https://x1.inkenkun.com/archives/780

jmx経由はcatalina.shに
export
CATALINA_OPTS=”-Dcom.sun.management.jmxremote -Dcom.sun.management.jmxremote.por
t=7777
-Dcom.sun.management.jmxremote.authenticate=false -Dcom.sun.management.jmxremot
e.ssl=false
-Djava.rmi.server.hostname=192.168.2.102″
を追加したらできた

GARBAGE CAUSED BY UFW IN LOGS

There were many ufw block logs in syslog, ufw.log and messages under /var/log/
,like as
Apr 15 16:29:05 raspberrypi kernel: [2831949.081700] [UFW BLOCK] IN=wlan0 OUT= MAC=xxxxxxxxxxxxxxxx SRC=IP address of router DST=224.0.0.1 LEN=28 TOS=0x00 PREC=0xC0 TTL=1 ID=28502 PROTO=2

Work around:
$ sudo ufw allow in from ‘IP address of router’ to 224.0.0.1
or
$ sudo ufw block in from ‘IP address of router’ to 224.0.0.1

Another garbage was like as
Apr 15 16:41:44 raspberrypi rsyslogd-2007: action ‘action 18’ suspended, next retry bla bla bla

Work around:
$ sudo nano /etc/rsyslog.conf

Comment out of rear part such as
#daemon.;mail.;\
#news.err;\
#.=debug;.=info;\
#.=notice;.=warn |/dev/xconsole

then reboot

BACKUP SCRIPT BY USING EXPECT

wordpress 用のデータをバックアップするためにExpectを使ってバックアップのためのス
クリプトを作ったので掲載。 後はcronで自動実行。
To backup wordpress data easily, I created a script with Expect and post it to
this site.

‘ install method in debian, ubuntu, raspbian
$ sudo apt-get install expect

‘script
――――from here―――――――――――――――――-
#!/usr/bin/expect
set timeout 300
spawn sudo scp -r aaa@192.168.xxx.yyy:/abc /backups/xxx
expect “aaa@192.168.xxx.yyy’s password:”
send “password\n”
expect “aaa@hostname ~ $”
spawn sudo scp -r aaa@192.168.xxx.yyy:/defg /backups/xxx
expect “aaa@192.168.xxx.yyy’s password:”
send “password\n”
expect “aaa@hostname ~ $”
spawn sudo scp -r bbb@192.168.zzz.uuu:/abc /backups/zzz
expect “bbb@192.168.zzz.uuu’s password:”
send “password2\n”
expect “bbb@hostname2 ~ $”
exit 0
――――――― until here―――――――――?

aaa, bbb, xxx, yyy, abc, defg, abc, hostname, hostname2 are
dummy just for open for public.

VBAで散布図のプロットが何に対応しているか表示

Excelの散布図で、「1.レコード(行)数が可変でも自動で散布図作成」、「2.特定
(先頭)のレコードのプロットを違う色で表示」、「3.プロットがどのレコードに対応
しているかを表示」を行う。

This article explains methods of [1. automatic build scatter chart independent f
rom record size (# of rows)], [2. display the plot of a specific record (top r
ow) with a different color], [3. Identification and indication about the record
of the selected plot]

data sheet
――――+―――――+―――――-+――――-+――――-+
=COUNTA($A$3:$A$10000) | |
|
――――+―――――+―――――-+――――-+――――-+
record | dat1 | dat2 | dat3 | dat4 |
――――+―――――+―――――-+――――+――――+
id1 | 1.18 | 2.11 | 0.97 | 1.63 |
id2 | 1.26 | 1.41 | 1.27 | 4.71 |
id3 | 1.24 | 2.52 | 1.38 | 2.26 |
id4 | 1.47 | 2.02 | 1.29 | 3.92 |
――――-+―――――+―――――-+―――――+―――+

scatter sheet ( two scatter charts)

1.レコード(行)数が可変でも自動で散布図作成

  1. automatic build scatter chart independently from record size

a) register names columns by using CTL+F3 and OFFSET function
e.g. name: val1
ref. range : =OFFSET(data!$B$3,0,0,data!$A$1,1)
name: val2
ref.range : = OFFSET(data!$c$3,0,0,data!$A$1,1)

b) create scatter chart with data range settings like as following e.g.
x series value: =data!val1
y series value: =data!val2

2.特定(先頭)のレコードのプロットを違う色で表示

  1. display the plot of top row with a different color

This method is simple.
Just add a data series with top record row , then overwrite the graph with this
graph.
e.g. series name: = “head_object”
x series value: =data!$b$3
y series value: =data!$c$3

3.プロットがどのレコードに対応しているかを表示

  1. Identification and indication about the record of the selected plot

I implemented this functionality with VBA.
a) create a class module
e.g. chart_event
b) write code in the chart_event module.
e.g.

Option Explicit
Public WithEvents scatterchart As Chart
Private Sub scatterchart_Select(ByVal ElementID As Long, ByVal x As Long, ByVal
y As Long)
‘ I don’t know ,but getChartElement was not necessary
‘ x is series index, y is plot index
If (ElementID = xlSeries) And (y <> -1) Then MsgBox Worksheets(“Data”).Cells(2 +
y, 1).Value()
End Sub

c) write code in a standard module
e.g. (in this case : enableplot is a macro activated by a button)

Dim scattercharts(1) As New chart_event
‘ don’t forget “new”
Sub enableplot()
‘ Keep the order of “dim” senetense and “sub” sentense
‘ if “sub” ? “dim” order, events are not captured
Set scattercharts(0).scatterchart = Worksheets(“scatter_chart”).ChartObjects(1).
Chart
Set scattercharts(1).scatterchart = Worksheets(“scatter_chart”).ChartObjects(2).
Chart
End Sub

d) put a button as control on scatterchart sheet and bind this button to the “en
ableplot” sub procedure

V-antena and Tanimoto's page