search for: dummy3

...oss 3 different kind of dummy variables (assuming I am working with Seasonal dummy, and number of season is 4): > dummy1 <- diag(4) > for(i in 1:3) dummy1 <- rbind(dummy1, diag(4)) > dummy1 <- dummy1[,-4] > > dummy2 <- dummy1 > dummy2[dummy2 == 0] = -1/(4-1) > > dummy3 <- dummy1 - 1/4 > > head(dummy1) [,1] [,2] [,3] [1,] 1 0 0 [2,] 0 1 0 [3,] 0 0 1 [4,] 0 0 0 [5,] 1 0 0 [6,] 0 1 0 > head(dummy2) [,1] [,2] [,3] [1,] 1.0000000 -0.3333333 -0.3333333 [2,] -0.3333333 1.0000...

...d files like in Fortran, but I couldn't find any function to write files in a similar way.. Since I want different formats for different lines, write(), write.table(), write.fwf() functions didn't work for me. Thanks for your time Ray ########## ########## In Fortran ########## real dummy3(3) real dummy4(4) real dummy2(2) dummy3 = (/1.1, 2.2, 3.3/) dummy4 = (/4.4, 5.5, 6.6, 7.7/) dummy2 = (/8.8, 9.9/) OPEN(UNIT=320,FILE='output.dat',FORM='FORMATTED') write(320,501) dummy3 write(320,502) dummy4 write(320,503) dummy2 close(320) 501 format(F5.1,F6.2,F7.3) 502 format(F...

...of an analysis and I found out what is for me a strange behaviour (I won't dare to say a bug) in both plot and points (and I suspect lines and other kind of lower level plots). If you try the following code: > data<-data.frame(dummy1=c(1:10),dummy2=c(1:10)) > plot(data$dummy1,data$dummy3) A plot of the values of dummy1 against an index is produced, even when dummy3 does not exist. Same happens with points. Also, the index is used as the x-axis, so specially when using points in a plot already made, the results can be missleading. Wouldn't it be better to just have an erro...

Thank you guys for your reply. I tried but it still does not work On 10/14/2015 5:37 PM, Stéphane PURNELLE wrote: > > These parameters must be put on share section, not in global section > > hide unreadable = yes > hide unwriteable files = yes > example > > [smb_shr1] > path = /mnt/LV002/share1 > read only = no > create mode = 0777

...00,12900,123,2345) data2<-data.frame(firm2,year2,industry2,dummy2,dimension2) data2 colnames(data2)<-c("firm","year","industry","dummy","dimension") firm3<-sort(rep(16:20,4),decreasing=F) year3<-rep(2001:2004,5) industry3<-rep(40,20) dummy3<-c(0,0,1,0,1,0,1,0,1,1,1,1,1,0,0,0,0,1,0,0) dimension3<-c(23456,1181,32489,2345,6754,8976,3245,1234,1288,1200,2345,2765,389,23456,2367,3892,6438,24824, 23,2897) data3<-data.frame(firm3,year3,industry3,dummy3,dimension3) data3 colnames(data3)<-c("firm","year","in...

...''de CV'') row = row.gsub(/de CV/, ''de C.V.'') row = row.gsub(/Mexico/, ''México'') row = row.gsub(/mexico/, ''México'') cname, st, county, street, street2, zip, phone, fax, email, cat, dummy, dummy2, dummy3 = row.chomp.split(/\s*\|\s*/) puts state(st, dbh) #todo: insert record... end end puts rows puts "inserted" This is a sample row (which is the one that actually gets mixed up): ARALY ALIMENTOS S.A DE C.V|JALISCO|EL SALTO|CALLE CARRET EL SALTO 2054-A |PUEBLO EL SALTO...

...signed char *wbase; size_t (*read)(FILE *, unsigned char *, size_t); size_t (*write)(FILE *, const unsigned char *, size_t); off_t (*seek)(FILE *, off_t, int); unsigned char *buf; size_t buf_size; FILE *prev, *next; int fd; int pipe_pid; long lockcount; short dummy3; signed char mode; signed char lbf; int lock; int waiters; void *cookie; off_t off; char *getln_buf; void *mustbezero_2; unsigned char *shend; off_t shlim, shcnt;}; was represented by %struct.__FILE_s = type { i32, i8*, i8*, i32 (%struct.__FILE_s*)*, i8*, i...

...+ 2,2,2,2, + 3,3,3,3, + 4,4,4,4, + 5,5,5,5, + 6,6,6,6, + 7,7,7,7, + 8,8,8,8, + 9,9,9,9, + 10,10,10,10) > pred <- cbind(int=rep(1,40), + dummy1=rep(c(1,0,0,0),10), + dummy2=rep(c(0,1,0,0),10), + dummy3=rep(c(0,0,1,0),10), + dummy4=rep(c(0,2,4,6),10)) > xcol <- 1:4 > zcol <- c(1,5) > a <- array (2,dim=c(2,2)) > prior <- list(a=1,Binv=1,c=2,Dinv=a) > result <- pan(y,subj,pred,xcol,zcol,prior,seed=25679,iter=5000) > result$y [1] 5 8 NaN 10 2 NaN NaN NaN 1...

...omain that have apostrophes in them and the "wbinfo" command doesn't seem to cope with them very well. For example, "wbinfo -u" produces: <snip> DJEPSON DJUDD DKELLY DKING DLongKelly,DMALLETT,DMCKENNA,DMCKENZIE,DoGregory,DOSHEA,DPabari,DSANDHU,DSwain,DTribbeck,DUMMY1,DUMMY3,dummy3ad,DWateridge,DWELLMAN,EBAKEWELL,EBALL,EBALLARD,EBURGE,EBurnett,ECHOUDHURY,ECHRISTENSEN,ECLARKE,ECLOUDER,ECOADY,EDAFIMU,EDAVIES,EDean,EDixon,EDRAP R EDyer EFRANK EGIBSON EGILL EGladwin EGOULD <snip> Hopefully the behaviour is pretty clear. "DLongKelly" is actually "DLon...

Hello I'm having trouble figuring out how to use the output of "segmented()" with a new set of predictor values. Using the example of the help file: ??set.seed(12) xx<-1:100 zz<-runif(100) yy<-2+1.5*pmax(xx-35,0)-1.5*pmax(xx-70,0)+15*pmax(zz-.5,0)+rnorm(100,0,2) dati<-data.frame(x=xx,y=yy,z=zz) out.lm<-lm(y~x,data=dati) o<-## S3

..., unsigned char *, size_t); > size_t (*write)(FILE *, const unsigned char *, size_t); > off_t (*seek)(FILE *, off_t, int); > unsigned char *buf; > size_t buf_size; > FILE *prev, *next; > int fd; > int pipe_pid; > long lockcount; > short dummy3; > signed char mode; > signed char lbf; > int lock; > int waiters; > void *cookie; > off_t off; > char *getln_buf; > void *mustbezero_2; > unsigned char *shend; > off_t shlim, shcnt;}; > > was represented by > > %stru...