r - ifelse statement with factor variable output -

-

i have dataframe df

  snp           effect   a1 a2 8  rs12145743    -0.0203  t  g 31  rs4650994    -0.0210   g 26  rs2602836     0.0192   g 34  rs4976033     0.0215   g 10 rs12525163    -0.0215  t  c 1  rs10282707    -0.0250  t  c 33  rs4917014    -0.0222  t  g 23  rs2293889    -0.0312  t  g 32  rs4871137    -0.0209  t  g 43   rs970548    -0.0258   c 27  rs2923084     0.0256   g 24  rs2303975     0.0279   g 36   rs499974    -0.0263   c 35  rs4983559    -0.0197   g 13 rs16942887     0.0831   g 16 rs17695224    -0.0290   g 18   rs181362    -0.0379  t  c

i creating new variable new_a1 different depending on value of effect.

if effect>0, new_a1 should contain value of a1.

if effect<0, new_a1 should contain value of a2.

i trying using following ifelse statement:

df$new_a1 <- ifelse(df$effect>0, df$a1, df$a2)

however, output not expected. new_a1 contains 1s , 2s, instead of maintaining values of factors in original variables a1 , a2

  snp           effect   a1 a2 new_a1 8  rs12145743    -0.0203  t  g      2 31  rs4650994    -0.0210   g      2 26  rs2602836     0.0192   g      1 34  rs4976033     0.0215   g      1 10 rs12525163    -0.0215  t  c      1 1  rs10282707    -0.0250  t  c      1 33  rs4917014    -0.0222  t  g      2 23  rs2293889    -0.0312  t  g      2 32  rs4871137    -0.0209  t  g      2 43   rs970548    -0.0258   c      1 27  rs2923084     0.0256   g      1 24  rs2303975     0.0279   g      1 36   rs499974    -0.0263   c      1 35  rs4983559    -0.0197   g      2 13 rs16942887     0.0831   g      1 16 rs17695224    -0.0290   g      2 18   rs181362    -0.0379  t  c      1

handling factor variables a1 , a2 character variables gives appropriate output.

hdl.dir$new_a1 <- ifelse(hdl.dir$hdl_effect<0, as.character(hdl.dir$a2), as.character(hdl.dir$new_a1))


Comments

Post a Comment

Popular posts from this blog

c++ - No viable overloaded operator for references a map -

-
i trying use map can make tag names reference number. when try , use it, in code error (6 in total every time reference map): src/main.cpp:25:45: error: no viable overloaded operator[] type 'std::map<std::string, std::string>' const char* idcs = node.child_value(tagmap[3]); this code: #include "pugi/pugixml.hpp" #include <iostream> #include <string> #include <map> int main() { pugi::xml_document doca, docb; std::map<std::string, pugi::xml_node> mapa, mapb; std::map<std::string, std::string> tagmap {{"1", "data"}, {"2", "entry"}, {"3", "id"}, {"4", "content"}}; if (!doca.load_file("a.xml") || !docb.load_file("b.xml")) { std::cout << "can't find input files"; return 1; } (auto& node: doca.child(tagmap[1]).children(tagmap[2])) { co
Read more

java - Custom OutputStreamAppender not run: LOGBACK: No context given for <MYAPPENDER> -

-
i wish write custom appender on basis of outputstreamappender . wrote following class package tests; import java.io.ioexception; import java.io.outputstream; import ch.qos.logback.core.outputstreamappender; public class myappender<e> extends outputstreamappender<e> { public myappender() { system.out.println("myappender created"); setoutputstream(new outputstream() { @override public void write(int b) throws ioexception { throw new unsupportedoperationexception(); } }); } } then wrote following runner: package tests; import org.slf4j.loggerfactory; import ch.qos.logback.classic.logger; public class runner { private static final logger log = (logger) loggerfactory.getlogger(runner.class); public static void main(string[] args) { //log.addappender(new myappender<iloggingevent>()); log.info("hello world"); } } finall
Read more

java - Cannot secure connection using TLS -

-
i'm trying establish secure socket connection between java client applet (built jdk 1.7.0_75-b13) , vc++ server application. as test vehicle, used vc++ client/server sample found in msdn forums, modified use schannel , able establish socket using cipher suite tls_rsa_with_aes_128_cbc_sha. works of tls 1.0/1.1/1.2. when try opening socket java applet same server application, connection rejected server reporting following: tls 1.0 acceptsecuritycontext failed: 0x80090327 tls 1.1 acceptsecuritycontext failed: 0x80090331 tls 1.2 acceptsecuritycontext failed: 0x80090331 this java code used create socket: debugprint("setting secure connection"); sslsocketfactory sslsocketfactory = (sslsocketfactory) sslsocketfactory.getdefault(); sslsocket sslsocket = (sslsocket) sslsocketfactory.createsocket("127.0.0.1", socketnumber); debugprint("starting handshake"); sslsocket.settcpnodelay(true); sslsocket.setsolinger(false, 0); sslsocket.s
Read more