diff options
author | Andreas Müller <andreas.mueller@ost.ch> | 2021-05-13 18:05:26 +0200 |
---|---|---|
committer | Andreas Müller <andreas.mueller@ost.ch> | 2021-05-13 18:05:26 +0200 |
commit | 0089fd1369af66dd7f694d18290f4f677b5046ba (patch) | |
tree | f78c224408d925cde800cd7f7d7b72f1a601d0e3 /vorlesungen/slides/8/wilf.m | |
parent | add new slides (diff) | |
download | SeminarMatrizen-0089fd1369af66dd7f694d18290f4f677b5046ba.tar.gz SeminarMatrizen-0089fd1369af66dd7f694d18290f4f677b5046ba.zip |
add new slides
Diffstat (limited to 'vorlesungen/slides/8/wilf.m')
-rw-r--r-- | vorlesungen/slides/8/wilf.m | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/vorlesungen/slides/8/wilf.m b/vorlesungen/slides/8/wilf.m new file mode 100644 index 0000000..49dc161 --- /dev/null +++ b/vorlesungen/slides/8/wilf.m @@ -0,0 +1,22 @@ +# +# wilf.m -- chromatische Zahl für einen Graphen +# +# (c) 2021 Prof Dr Andreas Müller, OST Ostschweizer Fachhochschule +# +N = 9; +A = zeros(N,N); + +for i = (1:N) + j = 1 + rem(i, N) + A(i,j) = 1; +endfor +for i = (1:3:N-3) + j = 1 + rem(i + 2, N) + A(i,j) = 1; +endfor + +A(1,3) = 1; + +A = A + A' + +eig(A) |