Hi Satish,
Using your code: part<-read.csv("spares.csv") str(part) #'data.frame': 838 obs. of 1 variable: # $ Cust_ID.Parts: Factor w/ 838 levels "100\tAIR\tFILTER\tHOUSING\t",..: 161 333 495 727 728 768 769 770 784 785 ... #I guess you have only two columns in the dataset lines1 <- readLines("spares.csv") head(lines1) #[1] "Cust_ID\tParts\t\t\t" "1\tFENDERS\t\t\t" #[3] "2\tFENDERS\t\t\t" "3\tOIL\tFILTERS\t\t" #[5] "4\tBMW\tSERVICE\tFLUIDS\t" "4\tOIL\tFILTER\t\t" part<-read.csv("spares.csv",header=TRUE,sep="\t") str(part) #'data.frame': 838 obs. of 5 variables: # $ Cust_ID: int 1 2 3 4 4 5 5 5 6 6 ... # $ Parts : Factor w/ 26 levels "AIR","ALTERNATOR",..: 9 9 16 4 16 6 9 12 6 9 ... # $ X : Factor w/ 14 levels "","BLADES","CAR",..: 1 1 6 14 5 1 1 1 1 1 ... # $ X.1 : Factor w/ 6 levels "","(AXLE","CARE",..: 1 1 1 4 1 1 1 1 1 1 ... # $ X.2 : Factor w/ 2 levels "","BOOT)": 1 1 1 1 1 1 1 1 1 1 ... part$Parts <- interaction(part[,2:5],sep=" ",drop=TRUE) part <- part[,1:2] str(part) #'data.frame': 838 obs. of 2 variables: # $ Cust_ID: int 1 2 3 4 4 5 5 5 6 6 ... # $ Parts : Factor w/ 31 levels "ALTERNATOR ",..: 6 6 21 28 20 3 6 8 3 6 ... as(split(part[,"Cust_ID"],part[,"Parts"]),"transactions") #transactions in sparse format with # 31 transactions (rows) and # 502 items (columns) A.K. On Saturday, April 19, 2014 11:08 PM, Sathish Kumar <tellsath...@gmail.com> wrote: Hi AK, I have attached the data set. And as you suggested, I coded as follows but still I am getting an error > part<-read.csv("spares.csv") > part >lst1<-split(part[,"Cust_ID"],part[,"Parts"]) > as(lst1, "transactions") Error in as(lst1, "transactions") : no method or default for coercing “list” to “transactions” On Sat, Apr 19, 2014 at 6:43 PM, arun <smartpink...@yahoo.com> wrote: > >Hi, > >Without a reproducible example using ?dput() or the package name, it is a bit >difficult to comment. > >Assuming that you used: >library(arules) > data("AdultUCI") >AdultUCI$ID <- 1:nrow(AdultUCI) > >lst1 <- split(AdultUCI[,"ID"], AdultUCI[,"marital-status"]) > as(lst1, "transactions") >#transactions in sparse format with ># 7 transactions (rows) and ># 48842 items (columns) > > > >A.K. > > > >On Saturday, April 19, 2014 5:01 PM, Sathish Kumar <tellsath...@gmail.com> >wrote: >Hi, > >To convert coerce the data set to transaction data set I used the code > >trans4 <- as(split(a[,"Cust_ID"], a[,"Parts"]), "transactions") > >but I am getting the following error- > >Error in as(split(a[, "Cust_ID"], a[, "Parts"]), "transactions") : nomethod >or default for coercing “list” to “transactions” > > > >Then I tried first converting the data set to matrix structure using the >code > >c_m<-as.matrix(c_df) >c_m > > > >then entered the following code > > >trans2 <- as(c_m, "transactions") > >but got the following error > >Error in as(c_m, "transactions") : no method or default for coercing >“matrix” to “transactions” >Please let me know how to correct the problem. > >Thanks >Sathish >______________________________________________ >R-help@r-project.org mailing list >https://stat.ethz.ch/mailman/listinfo/r-help >PLEASE do read the posting guide http://www.R-project.org/posting-guide.html >and provide commented, minimal, self-contained, reproducible code. > ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.