THanks again for your input. Still issues with dataframe...
When data converted to a dataframe:
library(OmicCircos)
options(stringsAsFactors = FALSE);
data<-read.table("DATA.txt",header=T)
gene.dataframe<-as.data.frame(data)
#Initialize value
gene.name <- gene.dataframe[,4]
gene.num <- length(unique(gene.dataframe[,4]));
head(gene.dataframe)
Chromosome Start End Gene Score
1 chr1 91381957 120069437 CDC14A -330
2 chr1 91381957 120069437 CSF1 -330
3 chr1 91381957 120069437 EB300 -330
4 chr1 91381957 120069437 WNT2B -330
5 chr1 91381957 120069437 TBX15 -330
6 chr1 91381957 120069437 DPYD -330
# Create df
db <- segAnglePo(gene.dataframe, seg=gene.name)
Error in Ops.factor(seg.dat[, 1], seg.n) :
level sets of factors are different