search for: dis1

Displaying 6 results from an estimated 6 matches for "dis1".

Did you mean: dis
2010 Jun 01
1
loop
Can any one help it will be very kind, loop statements I have this table and some more records, I want to reshape it V1 V2 V3 V4 V5 V6 V7 V8 V9 V10 TP53 Dis1 Dis2 Dis3 Dis4 Dis5 Dis6 DCI New1 New2 New3 New4 FDI Hi2 H3 H4 GHD I1 I3 I4 I5 I6 I7 I8 I want my new table or matrix to be some thing like this V1 V2 V3 Tp53 Dis1 Dis2 Tp53 Dis1 Dis3 Tp53 Dis1 Dis4 Tp53 Dis1 Dis5 Tp53 Dis1 Dis6 Tp53 Dis2 Dis3 Tp53 Dis2 Dis4 Tp53 Dis2 Dis5 Tp53 Dis2 Dis6 Tp53 Dis...
2010 Jun 08
2
constructing a contingency table (ftable, table)
Dear all, an hopefully quick table question. I have the following data: Two objects that are 2*9 matrix with nine column names (Dis1, ..., Dis9) and the row names (2010,2020). The content are frequencies (numeric). In want to create a table that is along the lines of ftable(UCBAdmissions) and should looks like this: Dis1 | ...| Dis9 2010|2020|....|2010|2020 (first row,first column is the value of Dis1 in 2010 from first object)...
2012 Mar 19
1
Lag based on Date objects with non-consecutive values
...s. I can't seem to figure out a way to insert an NA when there is non-consecutive date. So for example: ## A dataframe with non-consecutive dates set.seed(32) df1<-data.frame( Date=seq(as.Date("1967-06-05","%Y-%m-%d"),by="day", length=5), Dis1=rnorm(5, 1,10) ) df2<-data.frame( Date=seq(as.Date("1967-07-05","%Y-%m-%d"),by="day", length=10), Dis1=rnorm(5, 1,10) ) df <- rbind(df1,df2); df ## A function to lag the variable by a specified number of days lag.day <- function (lag.by, dat...
2001 Jun 12
1
cophenetic matrix
...nbre <- ask(message="Number of sounds") quest <- ask(message="Matrix of dissimilarity (1) or nxm matrix (2)") fichier <- read.table(nom) ## matrix nxn ou nxm ## proximity between objects: nxn or description of n objects with m attributes if(quest == 1){ dis1 <- as.dist(fichier) } else{ methode <- ask(message="The distance measure to be used = euclidean:1 maximum:2 manhattan:3 canberra:4 or binary:5") methodo <- c("euclidean", "maximum", "manhattan", "canberra" ,"binary")...
2000 Apr 21
1
SAMBA Browse Lists Sync DMB and LMB
...od. After a 'gracefull' shut down of Cad1 it is deleted from Comma's browse list. But from Door's browse list it would never be deleted, except restart of Samba on Door. 2. After bootting on a Win95 on one of Door's local networks (say it on 192.168.2. with ip .1 and name 'Dis1') it becomes visible in the Door's browse list. After some time it become visible in the Comma's browse list. And everything goes good. After a 'gracefull' shut down of Dis1 it is not deleted from Door's browse list and thus from Comma's too. Browse list's of both se...
2007 Jul 16
0
FW: summary statistics for groups
Kirsten, this may not be the most elegant approach, but I think I would create dummy variables on the fly for each disease code you have, then use the "with" function to get means. Give this a try: # setup some fake data as an example icd9 <- c(rep("dis1",4), rep("dis2",5), rep("dis3",3)) n <- length(icd9) exposure <- rnorm(n) working <- data.frame(icd9, exposure) # get some useful things together numDis <- length(levels(working$icd9)) diseaseCodes <- levels(working$icd9) # capture results in here results...