Skip to main content

Half-whiskers plot of difference in treatment effect

Below an alternative graphical representation of difference in treatment effects.




data ests;
missing z;
infile datalines delimiter=',' MISSOVER;
input behandling time VASe VASs lowere uppere lowers uppers;
datalines;
1,0,100,.z,100,100,.z,.z
1,1,78.88888889,.z,78.88888889,120,.z,.z
1,2,53.23552736,.z,53.23552736,100,.z,.z
1,3,27.7394636,.z,27.7394636,72.34042553,.z,.z
1,4,13.67521368,.z,13.67521368,78.72340426,.z,.z
1,5,7.948717949,.z,7.948717949,76.59574468,.z,.z
1,6,7.948717949,.z,7.948717949,77.65957447,.z,.z
1,7,2.948717949,.z,2.948717949,82.9787234,.z,.z
1,8,2.948717949,.z,2.948717949,81.91489362,.z,.z
2,0,.z,100,.z,.z,100,100
2,1,.z,64.40092166,.z,.z,11.11111111,64.40092166
2,2,.z,39.42105263,.z,.z,0,39.42105263
2,3,.z,22,.z,.z,0,22
2,4,.z,17.44444444,.z,.z,0,17.44444444
2,5,.z,9.545454545,.z,.z,0,9.545454545
2,6,.z,6.666666667,.z,.z,0,6.666666667
2,7,.z,5.409356725,.z,.z,0,5.409356725
2,8,.z,2.631578947,.z,.z,0,2.631578947
;;
run;

ods graphics on /noborder;
title 'Treatment effects';
proc sgplot data=ests noautolegend;
highlow x=time low=lowere high=uppere/HIGHCAP=Serif LINEATTRS=(color=cx003399); 
highlow x=time low=lowers high=uppers/LOWCAP=Serif LINEATTRS=(color=cxA23A2E); 
vbox VASe/category=time NOOUTLIERS EXTREME NOMEAN NOCAPS BOXWIDTH=0 CONNECT=MEAN meanattrs=(size=9) CONNECTATTRS=(color=cx003399);
vbox VASs/category=time NOOUTLIERS EXTREME NOMEAN NOCAPS BOXWIDTH=0 CONNECT=MEAN meanattrs=(size=9) CONNECTATTRS=(color=cxA23A2E);
scatter x=time y=VASe/MARKERATTRS=(symbol=SquareFilled color=cx003399);
scatter x=time y=VASs/MARKERATTRS=(symbol=CircleFilled color=cxA23A2E);
yaxis label="Treatment";
xaxis label="Time";
run;

Comments

Popular posts from this blog

HackRF on Windows 8

This technical note is based on an extract from thread. I have made several changes and added recommendations. I have experienced lot of latency using GnuRadio and HackRF on Pentoo Linux, so I wanted to try out GnuRadio on Windows.



HackRF One is a transceiver, so besides SDR capabilities, it can also transmit signals, inkluding sweeping a given range, uniform and Gaussian signals. Pentoo Linux provides the most direct access to HackRF and toolboxes. Install Pentoo Linux on a separate drive, then you can use osmocom_siggen from a terminal to transmit signals such as near-field GSM bursts, which will only be detectable within a meter.









Installation of MGWin and cmake: Download and install the following packages:
- MinGW Setup (Go to the Installer directory and download setup file)
- CMake (I am using CMake 3.2.2 and I installed it in C:\CMake, this path is important in the commands we must send in the MinGW shell)
Download and extract the packages respectively in the path C:\MinGW\msys\…

Example: Beeswarm plot in R

library(foreign)

data <- read.dta("C:/Users/hellmund/Documents/MyStataDataFile.dta")

names(data)

install.packages('beeswarm')

library(beeswarm)

levels(data$group)

png(file="C:/Users/hellmund/Documents/il6.png", bg="transparent")

beeswarm(data$il6~data$group,data=data, method=c("swarm"),pch=16,pwcol=data$Gender,xlab='',ylab='il6',ylim=c(0,20))

legend('topright',legend=levels(data$Gender),title='Gender',pch=16,col=2:1)

boxplot(data$il6~data$group, data=data, add = T, names = c("","",""), col="#0000ff22")

dev.off()

RPITX - a transmitter along frequencies from 130kHz to 500MHz

Great news. Raspberry Pi can now emit RF signals along a much wider range than previously publicized. It is three years since a team at Robotics Imperial College London wrote PiFM, a FM transmitter based on C and Python for the Raspberry Pi. PiFM enabled even novice Raspberians to setup a fm transmitter. RPITX by Evariste Okcestbon sets a new standard and may see a wide range of applications compared to PiFM. By design it is both more versatile and closer to the needs of a radio amateur. It is able to transmit at lower frequencies than even the HackRF, as it includes frequencies between 130kHz and 1MHz, though it is not capable of transmitting above 500MHz at this point. Innovations in electronics are still possible on Raspberry Pi, a modest platform for the auteur with the modest budget and a deep understanding of a well-documented interface and architecture. RPITX is available from GitHub. A third argument in the fcntl function open lacked in several source files (9th november …