search for: tf1

Hi, I've looked through the posts but couldn't find a solution to this. I'd be really grateful if someone could help, I'd like to convert a data file of mutual information that is formatted as a matrix:             TF1    TF2    TF3    TF200... Gene1    0.0    0.2    0.2 Gene2    1.4    0.0    2.8 Gene3    0.3    0.6    1.7 Gene6000.... To a list: Gene1    TF1    0.0 Gene1    TF2    0.2    Gene1    TF3    0.2 Gene2    TF1    1.4 Gene2    TF2    0.0 Gene2    TF3    2.8 Gene3    TF1    0.3 Gene3    TF2    0.6 Ge...

Dear R users, Below I have written 4 functions CIT1, CIT2a and CIT2b and CIT3 which recode a variable CLD_ISCH into 3 new variables(T1 T2 T3), I wish to use T1, T2 and T3 based on the values of tf1 and tf2. (NOTE:- T2a is used to create T2 in a long winded manner due to my lack of programming experience) I then attach T1 T2 and T3 to a dataset KidneyT that contains other variables i wish to use in a Cox regression model. I require the log likelihood statistic of a Cox model when variables T...

...uld contain more than 64 operands. b) produces a bunch of TokenFactor nodes with at most 64 operands, instead of one huge TokenFactor in the SelectionDAGLowering::getRoot(). If we have n pending loads, they can be combined into TFs in two ways: 1) The first 64 loads are put into a new node TF1. Then TF1 and the next 64 loads are put into a new node TF2 and so on. That is, each generated TF contains a previous TF as its first operand and a bunch of pending loads: ___TF2______ / | \ TF1 LD2.1 .. LD2.64 / \ LD1.1..LD1.64 2) Every 64 l...

...okenFactor nodes with at most 64 operands, > > instead of one huge TokenFactor in the > > SelectionDAGLowering::getRoot(). > > > > If we have n pending loads, they can be combined into TFs in two > > ways: > > 1) The first 64 loads are put into a new node TF1. Then TF1 and > > the next 64 loads are put into a new node TF2 and so on. That is, > > each generated TF contains a previous TF as its first operand and a > > bunch of pending loads: > > ___TF2______ > > / | \ > > TF1 LD2.1...

...M$D & DFM$D < 300, 1, ifelse( DFM$D < 200, -1, 0 ) ) DFM$t4 <- ifelse( 300 <= DFM$D & DFM$D < 400, 1, ifelse( DFM$D < 300, -1, 0 ) ) DFM$t5 <- ifelse( 400 <= DFM$D & DFM$D < 500, 1, ifelse( DFM$D < 400, -1, 0 ) ) # brute force method with ordered factor DFM$tf1 <- ifelse( "[0,100)" == DFM$bin, 1, 0 ) DFM$tf2 <- ifelse( "[100,200)" == DFM$bin, 1, ifelse( "[100,200)" < DFM$bin, 0, -1 ) ) DFM$tf3 <- ifelse( "[200,300)" == DFM$bin, 1, ifelse( "[200,300)" < DFM$bin, 0, -1 ) ) DFM$tf4 <- ifelse...

...( DFM$D < 200, -1, > 0 ) ) > DFM$t4 <- ifelse( 300 <= DFM$D & DFM$D < 400, 1, ifelse( DFM$D < 300, -1, > 0 ) ) > DFM$t5 <- ifelse( 400 <= DFM$D & DFM$D < 500, 1, ifelse( DFM$D < 400, -1, > 0 ) ) > # brute force method with ordered factor > DFM$tf1 <- ifelse( "[0,100)" == DFM$bin, 1, 0 ) > DFM$tf2 <- ifelse( "[100,200)" == DFM$bin, 1, ifelse( "[100,200)" < > DFM$bin, 0, -1 ) ) > DFM$tf3 <- ifelse( "[200,300)" == DFM$bin, 1, ifelse( "[200,300)" < > DFM$bin, 0, -1 ) )...

Thank you all for the useful suggestion. I did some of my homework. library(data.table) DFM <- read.table(header=TRUE, text='obs start end 1 2/1/2015 1/1/2017 2 4/11/2010 1/1/2011 3 1/4/2006 5/3/2007 4 10/1/2007 1/1/2008 5 6/1/2011 1/1/2012 6 10/5/2004 12/1/2004',stringsAsFactors = FALSE) DFM DFM$D =as.numeric(difftime(as.Date(DFM$end,format="%m/%d/%Y"),

...( DFM$D < 200, -1, > 0 ) ) > DFM$t4 <- ifelse( 300 <= DFM$D & DFM$D < 400, 1, ifelse( DFM$D < 300, -1, > 0 ) ) > DFM$t5 <- ifelse( 400 <= DFM$D & DFM$D < 500, 1, ifelse( DFM$D < 400, -1, > 0 ) ) > # brute force method with ordered factor > DFM$tf1 <- ifelse( "[0,100)" == DFM$bin, 1, 0 ) > DFM$tf2 <- ifelse( "[100,200)" == DFM$bin, 1, ifelse( "[100,200)" < > DFM$bin, 0, -1 ) ) > DFM$tf3 <- ifelse( "[200,300)" == DFM$bin, 1, ifelse( "[200,300)" < > DFM$bin, 0, -1 ) )...

...r creating fcVector, metric and > geneMetric (see output below). They all look ok in terms of > structure and length. But the error persists and listMetric > is not made?!?! Odd. > > > > I have added some comments to the output below. > > > >> tf2<-cumulMetric(tf1, deMirs$up)#deMirs$up is a > dataframe (see prev posts) > > [1] 2.63 2.63 3.13 2.63 3.13 2.74 # print fcVector - > looks ok > > [1] -0.35505 -0.34979 -1.03290 -1.22558 -0.61348 > -0.86584 # print metric - looks ok > > [1] 1045 # lengthof metric - is correct > >? ? ?...

...have equal tframes (time frames). There is no reason these should have similar arguments but the check seems to think that test.equal.tframe is a method for test.equal so I get: * checking generic/method consistency ... WARNING test.equal: function(obj1, obj2, ...) test.equal.tframe: function(tf1, tf2) 2/ I have some generics which may or may not already be defined (e.g. lag would be defined if library ts is attached) so in my R code I use if (!exists("lag")) lag <- function(x, ...) { UseMethod("lag") } but this results in Objects with usage in file `.../tframe/ma...

Hello all, I'm new in R, and I have a data-frame like this (dput information below): Specie Fooditem Occurrence Volume 1 Schizodon vegetal 1 0.05 2 Schizodon sediment 1 0.60 3 Schizodon vegetal 1 0.15 4 Schizodon alga 1 0.05 5 Schizodon sediment 1 0.90 6 Schizodon

...PresGenes. This is easy peasy! Where I'm falling down is that if I run this function it complains that 'geneMetric' can't be found. Hmm - I've run it all line by line (i.e. not as a function) and it works but wrapped up like this it fails! e.g. >testF2 <- cumulMetric(testF1, deMirs$up) Error in eval(expr, envir, enclos) : object 'geneMetric' not found deMirs$up looks like this: Probe? ? FC hsa-miR-183? ? 2.63 hsa-miR-1275? ? 2.74 hsa-miR-495? ? 3.13 hsa-miR-886-3p? ? 3.73 hsa-miR-886-5p? ? 3.97 hsa-miR-144*? ? 6.62 hsa-miR-451? ? 7.94 In an effort to debug...

Hi Another little patch, adding MiniFrame (a frame with small title bar and buttons which doesn''t appear in the desktop taskbar). Also a sample - not very interesting, happy to roll this into something else if that''s better. cheers alex _______________________________________________ wxruby-users mailing list wxruby-users@rubyforge.org

...ying to use the function 'kzft' iin the package 'kzft'. The problem is that i do not understand well how to use it. In particular, i tryed with this script (though the meaning of some of the coefficients is non clear to me): aa<-coeff.kzft(100,1) frq<-seq(0, 2*pi, by=0.05) tf1<-transfun.kzft(100,1,frq,0.0025) X<-kzft(Gamma[(1:196),(1:196),], 100, 1, 1, 0.005) thanks in advance. Lorenzo -- **************************************************************** credo nella ragione umana, e nella liberta' e nella giustizia che dalla ragione scaturiscono. (sciascia)...

Hey guys, I have been trying unsuccessfully to create a menu that holds "sub-menus". To clarify, I want something along the lines of when you click on a File menu, then see the "New" menu, which you can click on to open a new layer of menus. Is this supported yet in WxRuby? Robert _________________________________________________________________ Getting married? Find

Dear R users, please can you help me understand the behaviour of abline using function lm. I'm trying to learn linearity over groups. So I make three groups with 10 values each: test=data.frame(cbind( l=c(rnorm(10,0,30),rnorm(10,100,30),rnorm(10,200,30)), t = c(rep(0,10), rep(1,10), rep(2,10)) )) when I do: plot(test$l~test$t) abline(lm(test$l~test$t)) the abline is a straight line

...;) menu_bar.append(menu_tools, "Tools") # The "help" menu menu_help = Wx::Menu.new # Using Wx::ID_ABOUT default id means the menu item will be placed # in the correct platform-specific place - eg on OS X menu_help.append(Wx::ID_ABOUT, "&About...\tF1", "Show about dialog") menu_bar.append(menu_help, "&Help") # Assign the menubar to this frame self.menu_bar = menu_bar # Create a status bar create_status_bar(2) self.status_text = "Welcome to HL7Query!" # Set it up to handle men...

guys, 1)i made a mistake in my post. the said TF node was created when Selected() was called in ADDC node. 2) the source code under test short a,b; void test() { a+=b; } 3)the DAG after ADDC was seleced: Select node: 0x4977a20: ch,glue = <<Unknown Machine Node #65419>> 0x4972bd0, 0x49731d0, 0x4976c20, 0x49730d0<Mem:LD1[@a](align=2)> Result node: 0x4977a20: ch,glue =

Attached are patches to make the textctrl.rb sample work fully. Note the new %directorargout typemap I added to fix wxWindows calling into SWIG. I don''t know if this can fix all such problems or not. Let me know what you think. I also rubified the sample a little bit more. Also, note that I fix the << operator so the function can be called. I hope I did this right. Roy

...CandyApp.create do self.app_name = ''Minimal'' frame = CandyFrame.create(nil, :title => "Minimal wxRuby App", :size => [ 400, 300 ]) do menu_file = Wx::Menu.new() menu_help = Wx::Menu.new() menu_help.append(Wx::ID_ABOUT, "&About...\tF1", "Show about dialog") menu_file.append(Wx::ID_EXIT, "E&xit\tAlt-X", "Quit this program") menu_bar = Wx::MenuBar.new() menu_bar.append(menu_file, "&File") menu_bar.append(menu_help, "&Help") set_menu_ba...