similar to: stringdot ?

Hi!! I am trying to figure out how to use the string kernel "stringdot" in kernlab. k <- function(x,y) { (sum(x*y) +1)*exp(-0.001*sum((x-y)^2)) } class(k) <- "kernel" data(promotergene) ## train svm using custom kernel gene.k <- ksvm(Class~.,data=promotergene,kernel=k,C=10,cross=5) # works fine in this case gene.rbf <-

Hello, I have calculated the fourier transform of the series enclosed at the end of this message, by doing: library(stats) x <- readLines("file1.txt") x.num <- as.numeric(x) ft.x.num <- fft(x.num) My question is: why is the first value (Real) of ft.x.num that big? (954.833870) all the other values are much smaller. Am I doing something wrong? Could you please help me to

Hello all, I would like to use the train function from the caret package to train a svm with a spectral kernel from the kernlab package. Sadly a svm with spectral kernel is not among the many methods in caret... using caret to train svmRadial: ------------------ library(caret) library(kernlab) data(iris) TrainData<- iris[,1:4] TrainClasses<- iris[,5] set.seed(2)

Hello, Can someone help me to understand the meaning of the following R line? list(fk5 ~ .) Thanks, Renata ----------------------------------------- Email sent from www.virginmedia.com/email Virus-checked using McAfee(R) Software and scanned for spam

Hi, A. In a nutshell: The training error, obtained as "error (ret)", from the return value of a ksvm () call for a eps-svr model is (likely) being computed wrongly. "nu-svr" and "eps-bsvr" suffer from this as well. I am attaching three files: (1) ksvm.R from the the kernlab package, un-edited, (2) ksvm_eps-svr.txt: (for easier reading) containing only eps-svr

Hello, I have a series and I need to run a Fourier Transform for that series. I have done that using the function fft from stats package. However I am not sure whether the result I am getting is correct or not. Seems that the first value of the Fourier Transform list is the sum of all elements of the given series and all the following numbers represent a palindromic series for some how. I have

hi, I am using R's "kernlab" package, exactly i am doing classification using ksvm(.) and predict.ksvm(.).I want use of custom kernel. I am getting some error. # Following R code works (with promotergene dataset): library("kernlab") s <- function(x, y) { sum((x*y)^1.25) } class(s) <- "kernel" data("promotergene") gene <- ksvm(Class ~ .,

Hello, I am using kernlab to do some binary classification on aminoacid strings. I am using a custom kernel, so i use the kernel="matrix" option of the ksvm method. My (normalized) kernel matrix is of size 1309*1309, my results vector has the same length. I am using C-svc. My kernlab call is something similiar to this: ksvm(kernel="matrix", kernelMatrix, trainingDataYs,

Hello list, I am faced with a two-class classification problem with highly asymetric class sizes (class one: 99%, class two: 1%). I'd like to obtain a class probability model, also introducing available information on the class prior. Calling kernlab/ksvm with the line > ksvm_model1<-ksvm(as.matrix(slides), as.factor(Class), class.weights= c("0" =99, "1" =1),

Hello, I would like to know, whether for the support vector classification function ksvm() the response values stored in object at ymatrix are cross validated outputs/predictions: Example code from package kernlab, function ksvm: library(kernlab) ## train a support vector machine filter <- ksvm(type~.,data=spam,kernel="rbfdot",kpar=list(sigma=0.05),C=5,cross=3) filter filter at

Hello, together I'm trying to use user defined kernel. I know that kernlab offer user defined kernel(custom kernel functions) in R. I used data spam including package kernlab. (number of variables=58 number of examples =4061) i'm user defined kernel's form, kp=function(d,e){ as=v*d bs=v*e cs=as-bs cs=as.matrix(cs) exp(-(norm(cs,"F")^2)/2) }

I am using kernlab to build svm models. I am not sure how to access the different slots of the object. For instance if I want to get the nuber of support vectors for each of model I am building and store it in a vector. >ksvm.model <- ksvm(Class ~ ., data = somedata,kernel = "vanilladot", cross = 10, type ="C-svc") >names(attributes(ksvm.model)) [1] "param"

I've been trying to get some linear classifiers (LiblineaR, kernlab, e1071) to work with a sparse matrix of feature data. In the case of LiblineaR and kernlab, it seems I have to coerce my data into a dense matrix in order to train a model. I've done a number of searches, read through the manuals and vignettes, but I can't seem to see how to use either of these packages with sparse

Hello, I'm trying to using ksvm() in the kernlab package to fit a one-class SVC, but I get a strage result on the cross-validation error estimate. For example, consider this code: data(spam) classifier <- ksvm(type~.,data=spam[which(spam[,'type']=='spam'),], type="one-svc",kernel="rbfdot",kpar=list(sigma=0.1),nu=0.05,cross=10) what I get is: >

HI I am new to R. I have one problem in the predict function of the kernlab. I want to use ksvm and predict with kernelmatrix (S4 method for signature 'kernelMatrix') #executing the following sentences library(kernlab) # identity kernel k <- function(x,y) { n<-length(x) cont<-0 for(i in 1:n){ if(x[i]==y[i]){ cont<-cont+1 } } cont } class(k) <-

Hi there, I'm trying to do a regression experiment on a multidimensional dataset where both x and y in the model are multidimensional vectors. I'm using R version 2.9.2, updated packages, on a Linux box. I've tried gausspr(), ksvm() and rvm(), and the models are computed fine, but I'm always getting the same error message when I try to use predict(): "Error in

Hi All, I am using ksvm method in kernlab R package for support vector machines. I learned the multiclass one-against-one svm from training data and using it to classify new datapoints. But I want to update/finetune the 'svm weights' based on some criteria and use the updated svm weights in the predict method framework. I don't know if its possible or not, how do classify new

Hello all, I'm trying to run a gird parameter search for a svm. Therefore I'M using the ksvm function from the kernlab package. ---- svp <- ksvm(Ktrain,ytrain,type="nu-svc",nu=C) ---- The problem is that the optimization algorithm does not return for certain parameters. I tried to use setTimeLimit() but that doesn't seem to help. I suspect that ksvm() calls c code that

Dear list, I am using the ksvm function from kernlab as follows: (1) learning > svm.pol4 <- ksvm(class.labs ~ ., data = train.data, prob.model = T, scale = T, kernel = "polydot") (2) prediction > svm.pol.prd4 <- predict(svm.pol4, train.data, type = "probabilities")[,2] But unfortunately, when calling the prediction, once in every 10s of times (using the exact

with pred.pca<-predict(splits[[i]]$pca,trainingData at samples)[,1:nPCs] dframe<-as.data.frame(cbind(pred.pca,class=isExplosive(trainingData,2))); results[[i]]$classifier<-ksvm(class~.,data=dframe,scaled=T,kernel="polydot",type="C-svc", C=C,kpar=list(degree=degree,scale=scale,offset=offset),prob.model=T) and a degree of 5 i get an error of 0 reported by the ksvm