try this version:
x <- read.table(textConnection("Name Class
a Class1
a Class4
b Class2
b Class1
d Class3
d Class5
e Class4
e Class2"), header = TRUE)
closeAllConnections()
# add columns of numeric values of factors
x$name <- as.integer(x$Name)
x$class <- as.integer(x$Class)
# create plot area
plot(0
, type = 'n'
, xaxt = 'n'
, yaxt = 'n'
, xlab = ''
, ylab = ''
, xlim = c(0, max(x$class))
, ylim = c(0, max(x$name))
)
# now plot the rectangles
# rect(
# xleft = x$class - 1
# , ybottom = x$name - 1
# , xright = x$class
# , ytop = x$name
# , col = x$name
# )
# plot "*" instead
points(x$class - .5, x$name - .5, pch = "*", cex = 3)
# add the labels
axis(1
, at = seq(0.5, by = 1, length = length(levels(x$Class)))
, labels = levels(x$Class)
)
axis(2
, at = seq(0.5, by = 1, length = length(levels(x$Name)))
, labels = levels(x$Name)
)
On Mon, Oct 10, 2011 at 8:27 AM, Jurgens de Bruin <debrui...@gmail.com> wrote:
> Jim, This should work, would it be possible to plot * and not larg rec.
>
> On 10 October 2011 14:12, jim holtman <jholt...@gmail.com> wrote:
>>
>> See if this gives you the presentation you want:
>>
>> x <- read.table(textConnection("Name Class
>> a Class1
>> a Class4
>> b Class2
>> b Class1
>> d Class3
>> d Class5
>> e Class4
>> e Class2"), header = TRUE)
>> closeAllConnections()
>> # add columns of numeric values of factors
>> x$name <- as.integer(x$Name)
>> x$class <- as.integer(x$Class)
>> # create plot area
>> plot(0
>> , type = 'n'
>> , xaxt = 'n'
>> , yaxt = 'n'
>> , xlab = ''
>> , ylab = ''
>> , xlim = c(0, max(x$class))
>> , ylim = c(0, max(x$name))
>> )
>> # now plot the rectangles
>> rect(
>> xleft = x$class - 1
>> , ybottom = x$name - 1
>> , xright = x$class
>> , ytop = x$name
>> , col = x$name
>> )
>> # add the labels
>> axis(1
>> , at = seq(0.5, by = 1, length = length(levels(x$Class)))
>> , labels = levels(x$Class)
>> )
>> axis(2
>> , at = seq(0.5, by = 1, length = length(levels(x$Name)))
>> , labels = levels(x$Name)
>> )
>>
>>
>>
>> On Mon, Oct 10, 2011 at 6:49 AM, Jurgens de Bruin <debrui...@gmail.com>
>> wrote:
>> > Hi,
>> >
>> > Please advice on what type of graph can be used to display the following
>> > data set.
>> >
>> > I have the following:
>> >
>> > Name Class
>> > a Class 1
>> > a Class4
>> > b Class2
>> > b Class1
>> > d Class3
>> > d Class5
>> > e Class4
>> > e Class2
>> >
>> > So each entry in name can belong to more than one class. I want to
>> > represent
>> > the data as to see where overlaps occur that is which names are in the
>> > same
>> > Class Name and also which names are unique to a Class. I tough a Venn
>> > Diagram would work but this can only present numerical values for each
>> > Class, I would like each name to be presented by a dot or *.
>> >
>> > Any suggestions and how to would be appreciated.
>> >
>> > --
>> > Regards/Groete/Mit freundlichen Grüßen/recuerdos/meilleures salutations/
>> > distinti saluti/siong/duì yú/привет
>> >
>> > Jurgens de Bruin
>> >
>> > [[alternative HTML version deleted]]
>> >
>> >
>> > ______________________________________________
>> > 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.
>> >
>> >
>>
>>
>>
>> --
>> Jim Holtman
>> Data Munger Guru
>>
>> What is the problem that you are trying to solve?
>
>
>
> --
> Regards/Groete/Mit freundlichen Grüßen/recuerdos/meilleures salutations/
> distinti saluti/siong/duì yú/привет
>
> Jurgens de Bruin
>
--
Jim Holtman
Data Munger Guru
What is the problem that you are trying to solve?
______________________________________________
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.
