Venn Data Maker Post: 302979916

Sponsored Content

Homework and Emergencies Emergency UNIX and Linux Support Venn Data Maker Post 302979916 by RudiC on Sunday 21st of August 2016 01:14:20 PM

08-21-2016

Registered User

Another small refinement:

Code:

awk '
NR==1   {print "Name," $0
         CC = NF
         for (i=1; i<2^CC; i++) Set[i] = 0
         next
        }

        {for (i=1; i<=CC; i++)  {T[$i]
                                 R[$i,i] = 1
                                }
        }

END     {delete T[""]
         for (t in T)   {TMP = 0
                         for (i=1; i<=CC; i++)  {printf "%s,%s%s", i==1?t:_, R[t,i]+0, i==CC?RS:_
                                                 TMP = TMP + 2^(i-1)*R[t,i]
                                                }
                         Set[TMP]++
                        }
         for (i=1; i<2^CC; i++) {TMP = 0
                                 for (j=0; j<CC; j++) if (int(i/2^j)%2) TMP = TMP * 10 + j+1
                                 printf "Set%d_%s=%d" RS, TMP, TMP<10?"unique":"common", Set[i] |  "sort -k1.4,1n"
                                }
        }
' FS=, file
Name,Set1,Set2,Set3,S4,S5
g1,1,1,1,1,1
g2,1,1,0,1,0
g3,0,0,1,1,0
g4,1,0,0,1,1
g5,0,1,1,1,1
g6,1,0,0,1,1
g7,0,1,0,1,1
g8,0,0,1,0,1
Set1_unique=0
Set2_unique=0
Set3_unique=0
Set4_unique=0
Set5_unique=0
Set12_common=0
Set13_common=0
Set14_common=0
Set15_common=0
Set23_common=0
Set24_common=0
Set25_common=0
Set34_common=1
Set35_common=1
Set45_common=0
Set123_common=0
Set124_common=1
Set125_common=0
Set134_common=0
Set135_common=0
Set145_common=2
Set234_common=0
Set235_common=0
Set245_common=1
Set345_common=0
Set1234_common=0
Set1235_common=0
Set1245_common=0
Set1345_common=0
Set2345_common=1
Set12345_common=1

This User Gave Thanks to RudiC For This Post:

RudiC

View Public Profile for RudiC

Find all posts by RudiC

2 More Discussions You Might Find Interesting

1. Programming

maker

how can i remake a program to crash a harddrive using unix:rolleyes:

2. Shell Programming and Scripting

Venn diagram results using awk

Hi, I have the following files 1.txt a 10 b 11 c 12 d 13 e 14 f 15 g 16 h 17 i 18 j 19 k 20 2.txt a 21 b 22

LEARN ABOUT DEBIAN

setstyle

setstyle(1x)															      setstyle(1x)

NAME

       setstyle - set style related options for Window Maker or loads a theme

SYNOPSIS

       setstyle [--no-fonts] [--no-cursors] [--help] [--version] stylefile

DESCRIPTION

       setstyle reads stylefile and writes its contents to the WindowMaker domain, efectively setting the Window Maker style. If the supplied path
       is a directory, it will be treated as a theme pack and it will be loaded appropriately. If the --no-fonts flag is specified,  font  related
       options (IconTitleFont, ClipTitleFont, DisplayFont, MenuTextFont, MenuTitleFont, WindowTitleFont) in the style file will be ignored.

       If  the	--no-cursors  flag  is	specified,  any  mouse	cursor	definitions  (NormalCursor,  ArrowCursor, MoveCursor, TopLeftResizeCursor,
       TopRightResizeCursor, BottomLeftResizeCursor, BottomRightResizeCursor, VerticalResizeCursor, HorizontalResizeCursor, WaitCursor,  Question-
       Cursor, TextCursor, SelectCursor) in the style or theme will be ignored.

OPTIONS

       --no-fonts
	      ignore font related options in style file.

       --no-cursors
	      ignore cursor definition options in style file.

       --help print a help message

       --version
	      print version number

ENVIRONMENT

       GNUSTEP_USER_ROOT
	      specifies  the initial path for the Defaults directory. "Defaults/" is appended to this variable to determine the actual location of
	      the databases. If the varialbe is not set, it defaults to "~/GNUstep"

FILES

       GNUSTEP_USER_ROOT/Defaults/WindowMaker
	      This is the actual file that's written.

SEE ALSO

       getstyle(1x), wmaker(1x)

AUTHOR

       This man page was written by Marcelo Magallon <mmagallo@debian.org>.

       Window Maker was written by Alfredo K. Kojima <kojima@windowmaker.info>.

								   January 1999 						      setstyle(1x)