Displaying 14 results from an estimated 14 matches for "insulin".
2009 Oct 27
1
"ipredknn" - How may I find values?
...my code:
##########################
library(klaR)
library(ipred)
library(mlbench)
data(PimaIndiansDiabetes2)
dane=na.omit(PimaIndiansDiabetes2)[,c(2,5,9)]
dane[,2]=log(dane[,2])
dane[,1:2]=scale(dane[,1:2])
zbior.uczacy=sample(1:nrow(dane),nrow(dane)/2,F)
klasyfikatorKNN=ipredknn(diabetes~glucose+insulin,data=dane,subset=zbior.uczacy,k=3)
oceny=predict(klasyfikatorKNN,dane[-zbior.uczacy,],"class")
#data frames with my result from klasyfikatorKNN
df=data.frame(glucose=c(klasyfikatorKNN$learn$X[,1]),insulin=klasyfikatorKNN$learn$X[,2],diabetes=c(klasyfikatorKNN$learn$y))
#And picture
dra...
2010 Mar 09
1
create picture (k -the nearest neighbours)
...my easy code:
#################################
library(klaR)
library(ipred)
library(mlbench)
data(PimaIndiansDiabetes2)
dane=na.omit(PimaIndiansDiabetes2)[,c(2,5,9)]
dane[,2]=log(dane[,2])
dane[,1:2]=scale(dane[,1:2])
zbior.uczacy=sample(1:nrow(dane),nrow(dane)/2,F)
KNN=ipredknn(diabetes~glucose+insulin,data=dane,subset=zbior.uczacy,k=3)
KNN=ipredknn(diabetes~glucose+insulin,data=dane,subset=zbior.uczacy,k=3)
b= ifelse((a==1),'red','blue' )
a=as.numeric(KNN$learn$y)
plot(KNN$learn$X[,1], KNN$learn$X[,2],pch=a,col = ifelse((a==1),'red','blue'
))
##################...
2010 May 13
1
What's data() for?
Hi there,
>library(faraway)
>pima
pregnant glucose diastolic triceps insulin bmi diabetes age test
1 6 148 72 35 0 33.6 0.627 50 1
2 1 85 66 29 0 26.6 0.351 31 0
>data(pima)
>pima
pregnant glucose diastolic triceps insulin bmi diabetes age test
1 6 148 72 35...
2002 Jan 11
2
I'm stumped
I just installed 302p1 on a client's machine (I run it on all of
mine) and something is definetly wrong, can't figure out what.
ssh localhost
ssh_exchange_identification: Connection closed by remote host
stock config files except
ssh allows X11 forwarding
any suggestions?
Michael at Insulin-Pumpers.org
2012 Mar 24
0
NLME error model with several responses
Hi!
I am using the NLME package for R to modeling glucose-insuline
response with Bergman's model, very similar to the example in the
documentation for the NLME package.
My question concerns the model for the residuals. I use a proportional
model , Var(e_{ij})=(sigma_g*G(t))^2 for the glucose response and
Var(e_{ij})=(sigma_i * I(t))^2 for the insulin respon...
2010 Oct 13
5
Poisson Regression
Hello everyone,
I wanted to ask if there is an R-package to fit the following Poisson
regression model
log(\lambda_{ijk}) = \phi_{i} + \alpha_{j} + \beta_{k}
i=1,\cdots,N (subjects)
j=0,1 (two levels)
k=0,1 (two levels)
treating the \phi_{i} as nuinsance parameters.
Thank you very much
--
-Tony
[[alternative HTML version deleted]]
2009 Dec 17
2
some help regarding combining columns from different files
Dear all,
Here is my code which am using to combine 5th column from different data
sets.
Here is the function to do my job
genesymbol.append.file <-NULL
gene.column <- NULL
readGeneSymbol <- function(files,genesymbol.column=5){
for(i in fnames){
temp <- read.table(fnames,header=T,sep="\t",stringsAsFactors=F,quote="\"")
2010 Jan 12
0
problem with bio3d package
Hello,
I have a problem, when I run read.fasta.pdb I get this error:
pdb/seq: 1 name: dcluster.1
Error: subscript out of bounds
My FASTA file is the sequence of the bovine insuline.
Thanks in advance,
Rg
--
View this message in context: http://n4.nabble.com/problem-with-bio3d-package-tp1012116p1012116.html
Sent from the R help mailing list archive at Nabble.com.
2009 Mar 15
0
Axes crossing at origin
...png",width=18,height=18,units="cm",res=600,pointsize=16)
newdata=data.frame(x=seq(0,0.6*max(fit$df$x),length=200))
newy=predict(fit,newdata)
plot.new()
plot.window(xlim=c(0,0.6*max(fit$df$x)),ylim=c(15.7,17.5))
lines(newdata$x, newy)
axis(1)
axis(2)
abline(v=0, h=0)
mtext("FITC-insulin [mol]",1,2.4)
mtext("log intensity [log(LAU)]",2,2.4)
myydata=c(16.35,16.5,16.65,16.95,17.1,17.25)
source("predict_amount.r")
myxdata=predict_amount(fit,myydata,uselog=TRUE)
for(i in 1:length(myydata)){
lines(c(myxdata[i],myxdata[i],max(newdata)),c(min(newy),myydata[i],myy...
2004 Sep 22
3
My testimonial about skuper viakgra
[This email is either empty or too large to be displayed at this time]
2015 Feb 05
0
[SPAM] This could bring down the whole Diabetes Industry
...rget anything you`ve ever been told about Diabetes...
Because this `average` man`s discovery has not only
CURED over 20.000 people of their diabetes in just two weeks,
but it has the potential to wipe out the $245 billion
diabetes pharma industry FOR GOOD.
And get this - it has NOTHING to do with insulin,
exercise, diet or anything else you`ve heard in the
past.
It`s all based on latest breakthrough research that
Big Pharma is going stir crazy to hide from you.
Click Here To Find Out What All The Fuss Is About:
http://mail4.haemoundheilung.me/link.php?M=229682&N=2&L=1&F=T
regards,
Me...
2001 Dec 10
10
hang on exit bug under Linux
...t needs to be fixed to
make it generally acceptable as a replacement for virtually all other
remote shell access programs. Saying that rsh is broken also simply
doesnt' justify why a program under active development by a very
bright group of people has to be broken also.
Michael
Michael at Insulin-Pumpers.org
2001 Nov 14
6
[PATCH]: Patch to fix hang on exit bug under Linux and add optional exit delay
The hang-on-exit bug still hasn't been fixed in OpenSSH-3.0p1... :-(
Here again is the patch to fix this bug under Linux, updated for OpenSSH-3.0p1.
This has been exhaustively tested for six months now. It also add an exit
delay option that can be useful.
The patch does not lead to data loss under Linux.
Please see the Secure NFS page (SNFS) for further details:
2004 Oct 23
0
error making htb example
Newbie here...
tcng version 10b
I''m just learning about htb and using tcng. I am trying to make the
example in
Martin A. Brown''s Traffic Control with tcng and HTB HOWTO v0.5
example 2
/*
* Simply commented example of a tcng traffic control file.
*
* Martin A. Brown <mabrown@securepipe.com>
*
* Example: Using class selection path.
*
* (If you are reading the