Displaying 20 results from an estimated 133 matches for "table1".
Did you mean:
table
2011 Jan 01
3
Plot symbols: How to plot (and save) a graphic symbols originating from a table
Dear all,
Please, I have a doubt regarding symbol plotting
with data originating from a table.
Please, see below:
I have a tab delimited file called table1.txt with 4 columns:
ypos animal var1 var2
5 cat gina <= lady gina \u2264 lady
7 dog bill >= tony bill \u2265 tony
9 fish dude <= bro dude \u2264 bro
#I then load in the data to R:
table1<-read.table("table1.txt", header=TRUE, sep="\t")
#if I take a look at the...
2008 Jan 07
4
is there something like or() ?
hi, this may be trivial, but we can't seem to find anything adequate,
(although there is a work around with match() ). We are looking for something
along the lines of
plot(table1[table1$var2==or("a","b","c","d"),"var1"])
would be handy, with the potential or() function leading to what
plot(table1[table1$var2=="a" | table1$var2=="b" | table1$var2=="c" |
table1$var2=="d","var1&...
2013 Feb 01
2
How does this function print, why is n1 which equals 1 printed as 2?
...d(n1)
n2 <- ratio * n1
if (length(alpha) == 1) {
alpha1 <- NULL
}
else {
alpha1 <- alpha
}
if (length(power) == 1) {
power1 <- NULL
}
else {
power1 <- power
}
if (length(ratio) == 1) {
ratio1 <- NULL
}
else {
ratio1 <- ratio
}
table1 <- cbind(mu1, mu2, sd1, sd2, n1, n2, alpha1, power1,
ratio1)
colnames(table1)[colnames(table1) == "alpha1"] <- "alpha"
colnames(table1)[colnames(table1) == "power1"] <- "power"
colnames(table1)[colnames(table1) == "ratio...
2012 Jan 03
1
sqldf and not converting integers to floating point in SQLite
...D|1020
I would like to convert this to the following:
INSEE | VALUE_SPREAD
A|24.5
B|24.5
C|100
D|50
I can achieve this with a nested SQL query (through counting the
number of POSTAL that belong to any given INSEE, and diving the value
of the postal in that INSEE by that number).
library(sqldf)
table1 <- read.csv("c:/R/table1.csv", sep=";")
table2 <- read.csv("c:/R/table2.csv", sep=";")
table3 <- sqldf("select table2.INSEE, table1.VALUE / counts.nPostals
as value_spread from table1, table2,(select POSTAL, count(INSEE) as
nPostals from table2...
2006 Feb 28
2
Need help with a Power Find()
I was hoping someone would be able to help me with creating a method.
I have two tables. What I am trying to do is create a list of all the id''s
from table2 that aren''t currently referenced by Table1''s address_id column.
That way, when I create a new customer I can have a drop down list in the
view of all the addresses that are not currently being used.
##### Database #####
Table1
id
name
address_id
Table2
id
address
##### Models #####
class Table1 < ActiveRecord::Base
belongs_...
2010 Sep 10
4
for loop help please!
Hi Everyone,
I have a 2-dim data.matrix(e.g., table1) in which row1 specifies a range of
values. row2 - rown specify the number of times I want to replicate each
corresponding value in row1. I can do this with the following function:
rep(c(table1[1,]),c(table1[X,])) #where X would go from 2 - n.
Now, I can do this manually by changing the values...
2011 Jan 02
1
Please, need help with a plot
...#39;,'age <= 7','age <= 10','age <= 11','age <= 20','age <=
25','age <= 30','age <= 45','age <= 50','age < 55','age >= 55')
var2<-c(3.8,5.4,3.7,3.8,5.9,6.4,7.2,8.4,10.5,1.3,0.7)
table1<-data.frame(var1, var2)
plot(x=table1$var2,y=1:11,xlim=c(0,20),pch=20)
text(x=table1$var2,y=1:11,table1$var1,pos=4)
title(x=15,y=5,expression("how to substitute the < = with the " <=
"symbol"),font=5)
Please, note that the data must come from a table...
2004 Apr 23
4
Tcl Tk table
...ith the following example:
library(tcltk)
.Tcl("array unset tclArray")
myRarray <- matrix(1:1000, ncol=20)
for (i in (0:49))
for (j in (0:19))
.Tcl(paste("set tclArray(",i,",",j,") ",myRarray[i+1,j+1],sep=""))
tt<-tktoplevel()
table1 <- tkwidget(tt,"table",variable="tclArray", rows="50", cols="50")
tkpack(table1)
#Old version which worked in R 1.6 but it doesn't work with R 1.9 (and also not with 1.8), why??
tkcmd(.Tk.ID(table1),"tag","celltag","gruen&quo...
2019 Nov 12
6
[Bug 1382] New: nftables.py cmd leaking memory when ruleset contain mapping ip length to range with high limit 65535
...tfilter.org/attachment.cgi?id=574&action=edit
example of nftables.py leaking memory
System:
Gentoo 5.3.10 x86_64
nft up to date from GIT as of 12.11.2019
Overwiew:
nft commands which change ruleset leak memory when running through nftables.py
if ruleset contain rule like this:
add rule ip table1 chain1 counter name ip length map { 0-65535: "counter1" }
But no leaking happens when rule is changed to:
add rule ip table1 chain1 counter name ip length map { 0-65534: "counter1" }
Detailed info:
Consider this ruleset:
add table ip table1
add set ip table1 set1 { type ip...
2008 Jun 04
2
linear model in the repeated data type~
here is the data:
y<-c(5,2,3,7,9,0,1,4,5)
id<-c(1,1,6,6,7,8,15,15,19)
t<-c(50,56,50,56,50,50,50,60,50)
table1<-data.frame(y,id,t)//longitudinal data
what I want to do is to use the linear model for each id ,then get the
estimate value,like:
fit1<-lm(y~t,data=table1,subset=(id==1))
but ,you can see the variable "id" is quite irregular,they are not arranaged
in order and many number missi...
2005 May 13
17
modeling...
I''ve tried tackling this many ways on my own and can''t find a good solution:
Breaking it down to something simplier...
Venue
has one address
Person
has one address
Address
belongs to state
Assuming I don''t want to do tables for venue_addresses and person_addresses.
What is the best way to model this using rails... big thing here is i
want to be able
to reuse a
2006 Nov 17
2
Forming SQL Query at run-time
Hi.
I am trying to get data from mysql database using a couple of queries.
I do one query to find out the indexes. Then i need to use these
indexes in another query, but i keep getting errors.
Here is something:
numb <- dbSendQuery(con2, "select distinct(comparison) from table1")
count <- fetch(numb, -1)
my.matrix <- as.matrix(count)
rs <- dbSendQuery(con2, "select A.comparison,A.id, A.q_value,
B.q_value from table1 as A, table1 as B where A.comparison =
'my.matrix[11481]' AND B.comparison = 250 AND A.id = B.id")
RS-DBI driver: (could n...
2003 Jul 29
1
Tktable active cell
...hen I click
> into a cell, a message box should open with the information of
the
> location of the cell where I clicked in. <SNIP> So I only
> need to know how to get the possition of the active cell.
Thomas,
Getting the active cell is easy, just use :
row <- tclvalue(tkindex(table1,"active","row"))
col <- tclvalue(tkindex(table1,"active","col"))
But if you try to catch the left-button-click event and then
display the cell coordinates in a message box, the problem is
that your event handler will be run BEFORE the default event
h...
2007 Sep 24
0
Finds and Single Table Inheritance
Can someone please help me understand the results that are being
produced when doing queries on a table that is using single
inheritance.
Table1 < ActiveRecord::Base
Role1 < Table1
Role2 < Table1
Role3 < Table1
1. Role1.find(:all) produces:
"SELECT * FROM table1 WHERE type = ''Role1''"
2. any other find on table1 that calls anything but the Role1 Class
EXAMPLES. Table1.find(:all) or Table1.find(:all,...
2005 Feb 14
1
how can i make my program faster
Hello,
right now, i have a program to collect data into a table. right now, my table is
table1 <- data.frame(trial = NA, x = NA, y = NA)
for each time when i want to add data into my data, i have to copy data of table into an array for each column, and then i add new data into my array, then i copy my array into the table one column by one column. For example
temptrial <- table1$trial;...
2009 May 06
2
rmysql query help
...Thanks,
Aaron
require(RMySQL)
startdatetime<-"2009-04-04 01:00:00"
connect <-
dbConnect(MySQL(),user="xxxxx",password="xxxxxx",dbname="xxxxx",host="xxx.xxx.xxx.xxx")
forecast <- dbSendQuery(connect, statement=paste("SELECT ICE FROM table1
WHERE BEGTIME >= 'startdatetime'")) # doesnt read variable
or
forecast <- dbSendQuery(connect, statement=paste("SELECT ICE FROM table1
WHERE BEGTIME >="startdatetime)) # space error
but this seems to work
forecast <- dbSendQuery(connect, statement=paste("...
2013 May 01
1
Combine multiple tables into one
Hi,
May be this helps:
dat1<- as.data.frame(table1)
?dat2<- as.data.frame(table2)
names(dat2)<-c("V3","V4")
library(plyr)
res<-join(dat1,dat2,type="full")
?res[is.na(res)]<- 0
?res
#? V1 V2 V3 V4
#1? 1? 1? 0? 0
#2? 1? 2? 0? 0
#3? 0? 0? 0? 1
#4? 0? 0? 0? 4
?combinedtable<-as.matrix(res)
?colnames(combined...
2005 Dec 15
3
<no subject>
...trying to plot pair of experiments
coming from different file, trying to look at the behavior of individual
feature in pair of experiment.
My problem is that I have independent list from different source and I would
like to plot the pair of value using a common key. As in this simplified
version:
table1 = list(CGID=c("CG_1","CG_3","CG_2", "CG_4", "CG_5"),
diff=c(3,5,6,4,3))
table2 = list(CGID=c("CG_2","CG_3","CG_4", "CG_1", "CG_5"),
diff=c(4,6,3,9,10))
How can link the two table trough the CGIDC c...
2009 Jan 22
2
"latex" in Hmisc: cell formating
Hi list,
Could you explain the error I see here? Thanks!
## I'm using R 2.8.0 on WinXP, Hmisc_3.4-3
> table1 <- matrix(10, 180,7)
> cell.format <- matrix("", ncol=7, nrow=180)
> cell.format[c(seq(3,180,6),seq(4,180,6)),] <- "color{red}"
> cell.format[c(seq(5,180,6),seq(6,180,6)),] <- "color{green}"
>
> latex(table1, where='htbp', long=TRUE,...
2003 Jul 30
1
Tktable White column when WIDTH>13
On Wed, 30 Jul 2003 TSudler at ch.imshealth.com wrote:
<SNIP>
table1 <- tkwidget(tt,"table",variable="tclArray",
rows=as.character(dim(datifram)[1]+1),
cols=as.character(dim(datifram)[2]),titlerows="1",
titlecols="3",selectmode="extended",height="27",
width="13",bg="white",state="...