莊博堯
莊博堯

第柒章學習 Lisp 3rd Edition, Winston & Horn

ITERATION ON NUMBERS AND LISTS
---------------------------------------------------------------------

DOTIMES Supports Iteration on Numbers

(dotimes <(count parameter> <upper-bound form> <result form>)
  <body>)

(defun dotimes-expt (m n)
  (let ((result 1))                    ;Initialize result parameter.
    (dotimes (count n result)          ;Evaluate body N times.
      (setf result (* m result)))))    ;Multiply by M again.

題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題

7-1: Defines DOTIMES-FACTORIAL, using a DOTIMES form.
Factorial of n is 1, if n is 0, and n times the factorial of (n-1) otherwise.
That is:
n! = n * (n-1)!,    for n>0;
n! = 1,             for n=0.

---------------------------------------------------------------------------

DOLIST Supports Iteration on Lists

(dolist (<element parameter> <list form> <result form>)
  <body>)

* (count-layers '(18 75 31 180 270 52))
3

(setf freezing 32 boiling 212)

(defun count-layers (list-of-elements)
  (let ((result 0))                        ;Initialize result parameter.
    (dolist (element list-of-elements      ;Establish DOLIST parameter.
                     result)               ;Result form.
      (when (or (> element boiling)        ;Test element against high.
                (< element freezing)       ;Test element against low.
        (setf result (+ result 1))))))     ;Increment result.

(defun first-n-outlyers (n list-of-elements)
  (let ((result 0)                         ;Initialize result.
        (outlyers nil))                    ;Initialize result. 
  (dolist (element list-of-elements        ;Establish DOLIST parameter.
                   outlyers)               ;Result form
    (cond ((or (> element boiling)         ;Test element against high.
               (< element freezing))       ;Test element against low.
           (setf result (+ result 1))      ;Increment result.
           (push element outlyers))        ;Add element to the result.
          ((= n result) (return outlyers))))))  ;Stop when N found.

(defun clear-top (object)
  (dolist (obstacle <list of things the object supports> t>
    (get-rid-of obstacle)))

題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題

7-2: Write COUNT-OUTYERS-WITH-COUNT-IF using COUNT-IF instead of DOLIST.
-------------------------------------------------------------------------
7-3: Write LIST-OUTLYERS, a procedure that lists the elements in a list 
that are below the freezing point of water, FREEZING, or above the boiling
point, BOILING.  While you could do this using REMOVE-IF-NOT, do it instead
using DOLIST.
------------------------------------------------------------------------
7-4: Write LIST-OUTLYER-COUNTS, a procedure that counts the temperatures 
below freezing and above boiling separately, returning a list of the two
counts.  While you could do this with two separate calls involving
COUNT-IF, do it instead using DOLIST.
-----------------------------------------------------------------------
7-5: Ignoring the existence of MEMBER, write DOLIST-MEMBER, an iterative 
version of recursive-member:

(defun revursive-member (item l)
  (cond ((endp l) nil)
        ((eql item (first l)) t)
        (t (recursive-member item (rest l)))))

Note that both RECURSIVE-MEMBER and your solution, unlike MEMBER, are to
reutrn T when an item is found.
-----------------------------------------------------------------------
7-6: Ignoring the existence of Reverse, write DOLIST-REVERSE using DOLIST.

-------------------------------------------------------------------------- 

DO Is More General than DOLIST and DOTIMES

(defun do-expt (m n)                
  (do ((result 1)                        ;Bind parameters.   
       (exponent n))                     ;Bind parameters.
      ((zerop exponent) result)          ;Test and reeutrn.
    (setf result (* m result))           ;Body.
    (setf exponent (- exponent 1))))     ;Body.

(defun do-expt (m n)
  (do ((result 1)                       ;Bind parameters.
       (exponent n))                    ;Bind parameters.
      ()                                ;Test always fails.
    (when (zerop exponent)              ;Test.
      (return result))                  ;Return.
    (setf result (* m result))          ;Body.
    (setf exponent (- exponent 1))))    ;Body.

(defun do-expt (m n)
  (do ((result 1 (* m result))           ;Bind and update parameters.
       (exponent n (- exponent 1)))      ;Bind and update parameters.
      ((zerop exponent) result)))        ;Test and return.

(DO ((<parameter 1> <initial value 1> <update form 1>)
     (<parameter 2> <initial value 2> <update form 2>)
     ...
     (<parameter n> <initial value n> <update form n>))
    (<Termination test> <intermediate forms, if any> <result form>)
  <body>)


(defun do-expt (m n)
  (do ((result m (* m result))    ;Bugged!.
       (exponent n (- exponent 1))    ;RESULT starts as m not 1.
       (counter (- exponent 1)    ;Value of COUNTER is one less
                (- exponent 1)))    ;then value of EXPONENT.
      ((zerop counter) result)))





















題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題題

7-7: Define D0-FACTORIAL, using a DO form with an empty body.
---------------------------------------------------------------------
7-8: Ignoring the existence of MEMBER, write DO-MEMBER, an 
iterative version of RECURSIVE-MEMBER using DO.  Like MEMEBER,
DO-MEMBER is to return the remainder of the list when the item
is encountered:

(defun recursive-member (item 1)
  (cond ((endp l) nil)
        ((eql item (first l)) l)
        (t (recursive-member item (rest l)))))
--------------------------------------------------------------------
7-9: Ignoring the existence of REVERSE, a primitive supplied by 
Lisp, write DO-RESERVE using DO.

---------------------------------------------------------------------
(LOOP <body>)
--------------------------------------------------------------------
* (setf cheers '(cheer cheer cheer))
* (setf loop-count 0)

* (loop
    (when (endp cheers) (return loop-count))
    (setf cheers (rest cheers))
    (setf loop-count (+ loop-count 1)))
3
-------------------------------------------------------------------
* (prog1 (setf a 'x) (setf b 'y) (setf c 'z))
X
* (progn (setf a 'x) (setf b 'y) (setf c 'z))
Z
----------------------------------------------------------------------
(if <test>
    (progn <nonNIL side effect> ... <nonNIL consequent>)
    (progn <NIL side effect> ... <NIL consequent>))

解解解解解解解解解解解解解解解解解解解解解解解解解解解解解解解解解解解解解解解解

7-1:
(defun do-times-factorial (n)
  (let ((result 1))
    (dotimes (count n result)
      (setf result (* (+ 1 count) result)))))

Note that this version of DOTIMES-FACTORIAL is somewhat inefficient 
because we have to add one to COUNT each time the body of the DOTIMES 
form is evaluated.  If we did not do this, N would range from 0 to
n-1 rather than from 1 to n.
----------------------------------------------------------------
7-2:
(defun count-outlyers-with-count-if (list-of-element)
  (count-if #'(lambda (element) (or (> element boiling)
                                   (< element freezing)))
            list-of elements))
-----------------------------------------------------------------
7-3:
(defun list-outlyers (list-of-elements)
  (let ((outlyers nil))                     ;Initialize result.
    (dolist (element list-of-elements       ;Establish DOLIST parameter.
                     outlyers)              ;Return form.
      (when (or (> element boiling)         ;Test element against high.
                (< element freezing))       ;Test element against low.
        (setf outlyers                      ;Add element to the result.
              (cons element outlyers))))))  ;Build result.
-------------------------------------------------------------------
7-4:
(defun list-outlyer-counts (list-of-elements)
  (let ((count-above 0)                    ;Initialize count parameter.
        (count-below 0))                   ;Initialize count parameter.
    (dolist (element list-of-elements      ;Establish DOLIST parameter.
                     (list count-below count-above))    ;Return form.
      (cond ((> element boiling)           ;Test element against high. 
             (setf count-above             ;Increment COUNT-ABOVE.
                   (+ count-above 1)))
            ((< element freezing)          ;Test element against low.
             (setf count-below             ;Increment count-BELOW.
                   (+ count-below 1))))))
--------------------------------------------------------------------
7-5:
(defun dolist-member (item initial-list)
  (dolist (l initial-list)            ;Step through all elements.
    (when (eql item l)
      (return t))))
--------------------------------------------------------------------
7-6:
(defun dolist-reverse (initial-list)
  (let ((result nil))
    (dolist (l initial-list result)    ;Step through all elements.
      (setf result (cons l result))))) ;Build result using CONS.
---------------------------------------------------------------------
7-7:
(defun do-factorial (n)
  (do ((result 1 (* n result))        ;Initialize and reset.
       (n n (- n 1)))                 ;Initialize and reset.
    ((zerop n) result)))              ;Test and return.
------------------------------------------------------------------
7-8:
(defun do-member (item initial-list)
  (do ((l initial-list (rest l)))    ;Step through all elements.
      ((or (endp l)                  ;List exhausted?
           (eql item (first l)))     ;First element EQL to ITEM?
       l)))                          ;Return L, which may be NIL.
-------------------------------------------------------------------
7-9:
(defun do-reverse (initial-list)
  (do ((l initial-list (rest l))             ;Step through elements.
       (result nil (cons (first l) result))) ;Build Result.
      ((endp l) result)))                    ;Terminate.

你可能感兴趣的:(erlang,Scheme,haskell,lisp,clojure)

  • [附源码]SSM计算机毕业设计游戏账号交易平台JAVA 计算机程序源码 java游戏mysql
    项目运行环境配置：Jdk1.8+Tomcat7.0+Mysql+HBuilderX（Webstorm也行）+Eclispe（IntelliJIDEA,Eclispe,MyEclispe,Sts都支持）。项目技术：SSM+mybatis+Maven+Vue等等组成，B/S模式+Maven管理等等。环境需要1.运行环境：最好是javajdk1.8，我们在这个平台上运行的。其他版本理论上也可以。2.ID
  • Python+Django毕业设计校园易购二手交易平台（程序+LW+部署） Python、JAVA毕设程序源码 课程设计javamysql
    项目运行环境配置：Jdk1.8+Tomcat7.0+Mysql+HBuilderX（Webstorm也行）+Eclispe（IntelliJIDEA,Eclispe,MyEclispe,Sts都支持）。项目技术：SSM+mybatis+Maven+Vue等等组成，B/S模式+Maven管理等等。环境需要1.运行环境：最好是javajdk1.8，我们在这个平台上运行的。其他版本理论上也可以。2.ID
  • OPAMC架构介绍 OnRoadZy 架构开发语言racketlispECS
    1OPAMC的概念OPAMC架构来源于ECS架构的思想，用于实现面向对象绘图，采用Racket语言（Lisp语言的一个方言）实现。ECS架构（全称Entity-Component-System，即实体-组件-系统）是一种软件架构模式，主要用于游戏开发。ECS遵循组合优于继承的原则，游戏内的每一个基本单元都是一个实体，每个实体又由一个或多个组件构成，每个组件仅仅包含代表其特性的数据（即在组件中没有任
  • 什么是DSL和GPL 牧竹子 通识DSLGPL
    DSL的全称是domain-specificlanguage，它在wiki上的定义如下：Adomain-specificlanguage(DSL)isacomputerlanguagespecializedtoaparticularapplicationdomain.与之相对的是GPL(general-purposelanguage)。DSL指的是针对特定应用领域而设计使用的计算机语言，而GPL指
  • 什么是DSL yimi1995 程序员的日常
    转载：http://blog.csdn.net/dslztx/article/details/46682889DSL的全称是domain-specificlanguage，它在wiki上的定义如下：Adomain-specificlanguage(DSL)isacomputerlanguagespecializedtoaparticularapplicationdomain.与之相对的是GPL(g
  • DSL Davisxy kotlinDSLKotlinokhttp
    转载：摘抄自《Kotlin极简教程》-陈光剑DSL是什么DSL(Domain-SpecificLanguage，领域特定语言)指的是专注于特定问题领域的计算机语言(领域专用语言)。不同于通用的计算机语言(GPL)，领域特定语言只用在某些特定的领域。比如用来显示网页的HTML语言，以及Emacs所使用的EmacLISP语言等。更加典型的例子是Gradle，它基于Ant和Maven，使用基于Groov
  • 前端要给力之：原子，与原子联结的友类、友函数 aimingoo 动态函数式语言架构与设计QomoOpenProjectfunctionjavascriptqueryobject语言erlang
    JavaScript中的原子(Atom)是QoBean中提出的一个重要概念，借鉴自erlang，但具有与后者不同的含义。在QoBean里，Meta（元）与Atom（原子）是一对概念，前者表明执行系统中的最小单位，后者表明数据系统中的最小单位。QoBean约定这两个东西为一切元编程的初始，即最小化的执行系统与数据系统模型。有什么意义呢？没什么意义。这只具备理论上的完整性。为了描述这种完整性，QoBe
  • iOS13系统，URL scheme多次唤起app问题 九木一白
    URLscheme是可以唤起相关APP的，如果用scheme连续唤起app，app看似只会一次从后台被唤起，实际从生命周期监听会发现，app实际是被多次调用。如果唤起后需要执行别的方法，这个方法就会被执行多次，造成性能上的浪费。实际在第一次唤起app成功的时候，app已经从后台变的活跃，不管是冷启动还是热启动，可以在applicationDIdBecomeActive里面监听是否已经活跃，而这个方
  • XCode里的Run,Test,Profile,Analyze _compass
    点击XCode中左上角三角符号，此符号的作用是：Buildandthenrunthecurrentscheme.Run，Test，Profile,Analyze的区别是：•Runwillbuildandrunthetargetontheselecteddeviceorsimulator.•Testwillbuildyourtargetandrunitsunittests(YourTargetNam
  • Proto3：File Location - 文件位置 Upping8
    Prefernottoput.protofilesinthesamedirectoryasotherlanguagesources.Considercreatingasubpackageprotofor.protofiles,undertherootpackageforyourproject.如果不喜欢将.proto文件和其他语言资源放在同一个目录中。考虑在工程根包下为.proto文件创建一个子包
  • 【附源码】计算机毕业设计java智慧后勤系统设计与实现 计算机毕设程序设计 javamybatismysql
    项目运行环境配置：Jdk1.8+Tomcat7.0+Mysql+HBuilderX（Webstorm也行）+Eclispe（IntelliJIDEA,Eclispe,MyEclispe,Sts都支持）。项目技术：SSM+mybatis+Maven+Vue等等组成，B/S模式+Maven管理等等。环境需要1.运行环境：最好是javajdk1.8，我们在这个平台上运行的。其他版本理论上也可以。2.ID
  • Centos7安装RabbitMQ leafseelight rabbitmqcentos安装教程
    文章目录Centos7安装RabbitMQ第一步、安装任何软件包之前，建议使用以下命令更新软件包和存储库第二步、Erlang在默认的YUM存储库中不可用，因此您将需要安装EPEL存储库第三步、RabbitMQ是基于Erlang（面向高并发的语言）语言开发，所以在安装RabbitMQ之前，需要先安装Erlang语言第四步、检查Erlang版本，默认是最新版本第五步、下载RabbitMQ第六步、安装R
  • Haskell爬虫：连接管理与HTTP请求性能 小白学大数据 python爬虫http网络协议开发语言python
    爬虫技术作为数据抓取的重要手段，其效率和性能直接影响到数据获取的质量与速度。Haskell，作为一种纯函数式编程语言，以其强大的类型系统和并发处理能力，在构建高效爬虫方面展现出独特的优势。本文将探讨在Haskell中如何通过连接管理和HTTP请求优化来提升爬虫的性能。连接管理的重要性在HTTP请求中，连接管理是一个关键因素。有效的连接管理可以减少建立和关闭连接的开销，提高请求的响应速度。在Hask
  • Python 常用web框架 TigerZ* python用法相关python
    全功能框架Django应该是最流行的PythonWeb框架了，没有之一。而且其包含了创建应用需要的几乎全部功能，给人的感觉是这个框架希望框架本身实现各种功能，而不是依靠其他的库来完成。比如Django集成了安全认证，URLRouting，模板引擎，ORM以及数据库Scheme映射。这使得Django非常强大，有很好的可扩展性，性能也非常好。Django支持PostgreSQL,MySQL,SQLi
  • 使Emacs支持语法分析器 bison ManateeLazyCat
    前几天写了一个flex.el,今天看了一下bison-mode.el的代码,也太陈旧了,顺手再写一个bison.elbisonmodebison支持bison的标记定义和规则代码区域的语法高亮.安装方法下载bison里面的bison.el放到~/elisp目录把下面的配置加入到~/.emacs中(add-to-list'load-path(expand-file-name"~/elisp"))(r
  • kafka集群搭建 java皮皮虫 kafkaspringboot后台kafkakafka测试kafka集群
    Kafka集群搭建一、概念说明它是一个分布式消息系统，由linkedin使用scala编写，用作LinkedIn的活动流（ActivityStream）和运营数据处理管道（Pipeline）的基础。具有高水平扩展和高吞吐量。比较定义解释：1、Java和scala都是运行在JVM上的语言。2、erlang和最近比较火的和go语言一样是从代码级别就支持高并发的一种语言，所以RabbitMQ天生就有很高
  • SpringBoot中如何使用RabbitMq shenzhenNBA Java管理者/开发者java-rabbitmqspringbootrabbitmq
    一，RabbitMQ简介和基本概念RabbitMQ是一个开源的消息中间件，基于AMQP（高级消息队列协议）实现。它由Erlang语言开发，并且支持多种编程语言，包括Java、Python、Ruby、PHP和C#等，下载并安装Erlang：因此在安装RabbitMQ之前必须先安装并配置好Erlang环境，安装完成后，需要将Erlang的bin目录添加到系统的PATH环境变量中，这样可以在命令行中直接
  • rabbitmq 怎么实现延迟消息队列？ 搬砖的小子 javajava-rabbitmqrabbitmq分布式
    Rabbitmq本身是没有延迟队列的，要实现延迟消息，一般有两种方式：1.通过Rabbitmq本身队列的特性来实现，需要使用Rabbitmq的死信交换机（Exchange）和消息的存活时间TTL（TimeToLive）。2.在rabbitmq3.5.7及以上的版本提供了一个插件（rabbitmq-delayed-message-exchange）来实现延迟队列功能。同时插件依赖Erlang/OPT
  • Mac 如何在终端玩游戏 极客点儿 #Mac
    1.在Mac上打开终端2.输入命令：emacs回车PS：emacs是unix的texteditor，是richardstallman在1976年编写的3.按住ESC+x进入编辑模式俄罗斯方块：输入tetris回车贪吃蛇：输入snake回车4.除了这个游戏，还有好多进入目录：cd/usr/share/emacs/22.1/lisp/play/查看文件：ls5.退出emacsControl+xCont
  • JAVA计算机毕业设计校园二手书交易系统（附源码、数据库） 卓杰计算机设计 java数据库开发语言
    JAVA计算机毕业设计校园二手书交易系统（附源码、数据库）目运行环境项配置：Jdk1.8+Tomcat8.5+Mysql+HBuilderX（Webstorm也行）+Eclispe（IntelliJIDEA,Eclispe,MyEclispe,Sts都支持）。项目技术：JAVA+mybatis+Maven+Vue等等组成，B/S模式+Maven管理等等。环境需要1.运行环境：最好是javajdk1
  • JAVA毕设项目校园二手商品交易系统（java+VUE+Mybatis+Maven+Mysql） 贤杰程序源码 mybatisjavavue.js
    JAVA毕设项目校园二手商品交易系统（java+VUE+Mybatis+Maven+Mysql）项目运行环境配置：Jdk1.8+Tomcat8.5+Mysql+HBuilderX（Webstorm也行）+Eclispe（IntelliJIDEA,Eclispe,MyEclispe,Sts都支持）。项目技术：JAVA+mybatis+Maven+Vue等等组成，B/S模式+Maven管理等等。环境需
  • RabbitMQ 入门：基本概念、特性及简单示例 Lill_bin javarabbitmq分布式云计算springbootjava后端中间件
    什么是RabbitMQ？RabbitMQ是一个开源的消息代理和队列服务器，用Erlang语言编写。它支持多种消息协议，包括AMQP0-9-1，并提供了可靠性、灵活的路由、消息持久性等功能。RabbitMQ是易于使用的，支持多种编程语言，包括Python、Ruby、Java、JavaScript、PHP、.NET等。RabbitMQ的主要特性异步消息处理：RabbitMQ允许系统组件通过消息传递异步
  • [附源码]JAVA毕业设计基于web旅游网站的设计与实现（系统+LW） 晶涛计算机毕设 java前端旅游
    [附源码]JAVA毕业设计基于web旅游网站的设计与实现（系统+LW）目运行环境项配置：Jdk1.8+Tomcat8.5+Mysql+HBuilderX（Webstorm也行）+Eclispe（IntelliJIDEA,Eclispe,MyEclispe,Sts都支持）。项目技术：JAVA+mybatis+Maven+Vue等等组成，B/S模式+Maven管理等等。环境需要1.运行环境：最好是ja
  • [附源码]java毕业设计基于web旅游网站的设计与实现 李会计算机程序设计 java前端旅游
    项目运行环境配置：Jdk1.8+Tomcat7.0+Mysql+HBuilderX（Webstorm也行）+Eclispe（IntelliJIDEA,Eclispe,MyEclispe,Sts都支持）。项目技术：SSM+mybatis+Maven+Vue等等组成，B/S模式+Maven管理等等。环境需要1.运行环境：最好是javajdk1.8，我们在这个平台上运行的。其他版本理论上也可以。2.ID
  • RabbitMQ本地Ubuntu系统环境部署与无公网IP远程连接服务端实战演示 深鱼~ cpolarrabbitmqubuntutcp/ip
    文章目录前言1.安装erlang语言2.安装rabbitMQ3.安装内网穿透工具3.1安装cpolar内网穿透3.2创建HTTP隧道4.公网远程连接5.固定公网TCP地址5.1保留一个固定的公网TCP端口地址5.2配置固定公网TCP端口地址推荐前些天发现了一个巨牛的人工智能学习网站，通俗易懂，风趣幽默，忍不住分享一下给大家。【点击跳转到网站】前言本文主要介绍如何在Ubuntu系统环境下，安装Rab
  • 十进制度分秒lisp函数_十进制经纬度与度分秒格式相互转换 Excel weixin_39763902 十进制度分秒lisp函数
    每次出完野外回来处理GPS坐标数据时，都面临十进制和度分秒之间的转换问题，今天就来研究一下。十进制转度分秒假设excel表格A2单元格中存储的是一个十进制的坐标值，想在B2单元格中得到度分秒坐标值并显示度分秒符号，计算公式则为B2=TEXT(INT(A2),"0")&"°"&TEXT(INT((A2-INT(A2))*60),"00")&"′"&TEXT(((A2-INT(A2))*60-INT(
  • 2019-03-21 蜜思1013
    SPA:单页应用https://baike.baidu.com/item/SPA/175363131.场景（1）中后台管理系统（2）H5前端开发（3）跨端APP开发2.技术栈（1）SpringBootvue-cliIDEnpmElementUI（2）vue-cliSPA,npm,建议自己布局写样式（3）uni-app,Flutter,RN,cordova(调用底层API)3.IDE（1）WSVSc
  • window10安装RabbitMQ资源及教程 小胖学编程
    1.首先下载并安装erlang下载地址：http://www.erlang.org/downloadsimage.png网速不好的同学，可以去百度云下载：版本：otp_win64_22.0（64位）链接：https://pan.baidu.com/s/1VNOPkKWDvekZGsJGOZ3NtQ提取码：h8qk2.按照如下教程完成安装：windows10环境下的RabbitMQ安装步骤（图文）3
  • 手残党福音，一键生成随机颜色：randomColor 我码玄黄 前端教你一招思维的火花前端JavaScript开源
    前言在项目中常常会遇到根据一个主颜色，然后生成一整个主题色系各种层次颜色的需求，尤其在切换主题、随机展示内容等场景。恰好找到了一库可以实现此功能，话不多说，我们一起来看看吧。randomColor线上github地址：https://github.com/davidmerfield/randomColor目前这个项目已经被移植到了各个常用语言中，例如C#,C++,Go,Haskell,Kotlin
  • JavaScript 深度剖析 - 函数式编程范式 时光海丶 大前端javascript函数式编程
    函数式编程范式1.1函数式编程概念函数是一等公民高阶函数闭包1.2纯函数概念功能库lodash优劣纯函数的好处纯函数的副作用1.3柯里化(HaskellBrooksCurry)概念lodash中的柯里化函数总结1.4函数组合(compose)管道函数组合1.5Lodash中的fp模块1.6PointFree模式1.7函子Functor函子MayBe函子Either函子IO函子Task函子Point
  • Java开发中，spring mvc 的线程怎么调用？ 小麦麦子 springmvc
    今天逛知乎，看到最近很多人都在问spring mvc 的线程http://www.maiziedu.com/course/java/ 的启动问题，觉得挺有意思的，那哥们儿问的也听仔细，下面的回答也很详尽，分享出来，希望遇对遇到类似问题的Java开发程序猿有所帮助。 问题：     在用spring mvc架构的网站上，设一线程在虚拟机启动时运行，线程里有一全局
  • maven依赖范围 bitcarter maven
    1.test 测试的时候才会依赖，编译和打包不依赖，如junit不被打包 2.compile 只有编译和打包时才会依赖 3.provided 编译和测试的时候依赖，打包不依赖，如：tomcat的一些公用jar包 4.runtime 运行时依赖，编译不依赖 5.默认compile 依赖范围compile是支持传递的，test不支持传递 1.传递的意思是项目A，引用
  • Jaxb org.xml.sax.saxparseexception : premature end of file darrenzhu xmlprematureJAXB
    如果在使用JAXB把xml文件unmarshal成vo(XSD自动生成的vo)时碰到如下错误： org.xml.sax.saxparseexception : premature end of file 很有可能时你直接读取文件为inputstream，然后将inputstream作为构建unmarshal需要的source参数。InputSource inputSource = new In
  • CSS Specificity 周凡杨 html权重Specificitycss
      有时候对于页面元素设置了样式，可为什么页面的显示没有匹配上呢？ because specificity CSS 的选择符是有权重的，当不同的选择符的样式设置有冲突时，浏览器会采用权重高的选择符设置的样式。     规则：   HTML标签的权重是1 Class 的权重是10 Id 的权重是100
  • java与servlet g21121 servlet
    servlet 搞java web开发的人一定不会陌生，而且大家还会时常用到它。 下面是java官方网站上对servlet的介绍： java官网对于servlet的解释 写道 Java Servlet Technology Overview Servlets are the Java platform technology of choice for extending and enha
  • eclipse中安装maven插件 510888780 eclipsemaven
    1.首先去官网下载 Maven： http://www.apache.org/dyn/closer.cgi/maven/binaries/apache-maven-3.2.3-bin.tar.gz 下载完成之后将其解压， 我将解压后的文件夹：apache-maven-3.2.3， 并将它放在 D:\tools目录下， 即 maven 最终的路径是：D:\tools\apache-mave
  • jpa@OneToOne关联关系 布衣凌宇 jpa
    Nruser里的pruserid关联到Pruser的主键id，实现对一个表的增删改，另一个表的数据随之增删改。 Nruser实体类 //***************************************************************** @Entity @Table(name="nruser") @DynamicInsert @Dynam
  • 我的spring学习笔记11-Spring中关于声明式事务的配置 aijuans spring事务配置
    这两天学到事务管理这一块，结合到之前的terasoluna框架，觉得书本上讲的还是简单阿。我就把我从书本上学到的再结合实际的项目以及网上看到的一些内容，对声明式事务管理做个整理吧。我看得Spring in Action第二版中只提到了用TransactionProxyFactoryBean和<tx:advice/>,定义注释驱动这三种，我承认后两种的内容很好，很强大。但是实际的项目当中
  • java 动态代理简单实现 antlove javahandlerproxydynamicservice
    dynamicproxy.service.HelloService package dynamicproxy.service; public interface HelloService { public void sayHello(); }   dynamicproxy.service.impl.HelloServiceImpl package dynamicp
  • JDBC连接数据库 百合不是茶 JDBC编程JAVA操作oracle数据库
             如果我们要想连接oracle公司的数据库，就要首先下载oralce公司的驱动程序，将这个驱动程序的jar包导入到我们工程中;   JDBC链接数据库的代码和固定写法;     1,加载oracle数据库的驱动;     &nb
  • 单例模式中的多线程分析 bijian1013 javathread多线程java多线程
    谈到单例模式，我们立马会想到饿汉式和懒汉式加载，所谓饿汉式就是在创建类时就创建好了实例，懒汉式在获取实例时才去创建实例，即延迟加载。 饿汉式： package com.bijian.study; public class Singleton { private Singleton() { } // 注意这是private 只供内部调用 private static
  • javascript读取和修改原型特别需要注意原型的读写不具有对等性 bijian1013 JavaScriptprototype
            对于从原型对象继承而来的成员，其读和写具有内在的不对等性。比如有一个对象A，假设它的原型对象是B，B的原型对象是null。如果我们需要读取A对象的name属性值，那么JS会优先在A中查找，如果找到了name属性那么就返回；如果A中没有name属性，那么就到原型B中查找name，如果找到了就返回；如果原型B中也没有
  • 【持久化框架MyBatis3六】MyBatis3集成第三方DataSource bit1129 dataSource
    MyBatis内置了数据源的支持，如：   <environments default="development"> <environment id="development"> <transactionManager type="JDBC" /> <data
  • 我程序中用到的urldecode和base64decode,MD5 bitcarter cMD5base64decodeurldecode
    这里是base64decode和urldecode，Md5在附件中。因为我是在后台所以需要解码： string Base64Decode(const char* Data,int DataByte,int& OutByte) { //解码表 const char DecodeTable[] = { 0, 0, 0, 0, 0, 0
  • 腾讯资深运维专家周小军：QQ与微信架构的惊天秘密 ronin47
    社交领域一直是互联网创业的大热门，从PC到移动端，从OICQ、MSN到QQ。到了移动互联网时代，社交领域应用开始彻底爆发，直奔黄金期。腾讯在过去几年里，社交平台更是火到爆，QQ和微信坐拥几亿的粉丝，QQ空间和朋友圈各种刷屏，写心得，晒照片，秀视频，那么谁来为企鹅保驾护航呢？支撑QQ和微信海量数据背后的架构又有哪些惊天内幕呢？本期大讲堂的内容来自今年2月份ChinaUnix对腾讯社交网络运营服务中心
  • java-69-旋转数组的最小元素。把一个数组最开始的若干个元素搬到数组的末尾，我们称之为数组的旋转。输入一个排好序的数组的一个旋转，输出旋转数组的最小元素 bylijinnan java
    public class MinOfShiftedArray { /** * Q69 旋转数组的最小元素 * 把一个数组最开始的若干个元素搬到数组的末尾，我们称之为数组的旋转。输入一个排好序的数组的一个旋转，输出旋转数组的最小元素。 * 例如数组{3, 4, 5, 1, 2}为{1, 2, 3, 4, 5}的一个旋转，该数组的最小值为1。 */ publ
  • 看博客，应该是有方向的 Cb123456 反省看博客
    看博客，应该是有方向的:  我现在就复习以前的，在补补以前不会的，现在还不会的，同时完善完善项目，也看看别人的博客.  我刚突然想到的:  1.应该看计算机组成原理，数据结构，一些算法，还有关于android,java的。  2.对于我，也快大四了，看一些职业规划的，以及一些学习的经验，看看别人的工作总结的.    为什么要写
  • [开源与商业]做开源项目的人生活上一定要朴素,尽量减少对官方和商业体系的依赖 comsci 开源项目
         为什么这样说呢？  因为科学和技术的发展有时候需要一个平缓和长期的积累过程，但是行政和商业体系本身充满各种不稳定性和不确定性，如果你希望长期从事某个科研项目，但是却又必须依赖于某种行政和商业体系，那其中的过程必定充满各种风险。。。       所以，为避免这种不确定性风险，我
  • 一个 sql优化 （[精华] 一个查询优化的分析调整全过程！很值得一看 ） cwqcwqmax9 sql
    见   http://www.itpub.net/forum.php?mod=viewthread&tid=239011 Web翻页优化实例 提交时间: 2004-6-18 15:37:49      回复    发消息  环境： Linux ve
  • Hibernat and Ibatis dashuaifu Hibernateibatis
    Hibernate  VS  iBATIS 简介 Hibernate 是当前最流行的O/R mapping框架，当前版本是3.05。它出身于sf.net，现在已经成为Jboss的一部分了 iBATIS 是另外一种优秀的O/R mapping框架，当前版本是2.0。目前属于apache的一个子项目了。 相对Hibernate“O/R”而言，iBATIS 是一种“Sql Mappi
  • 备份MYSQL脚本 dcj3sjt126com mysql
    #!/bin/sh # this shell to backup mysql #[email protected] (QQ:1413161683 DuChengJiu) _dbDir=/var/lib/mysql/ _today=`date +%w` _bakDir=/usr/backup/$_today [ ! -d $_bakDir ] && mkdir -p
  • iOS第三方开源库的吐槽和备忘 dcj3sjt126com ios
    转自 ibireme的博客   做iOS开发总会接触到一些第三方库，这里整理一下，做一些吐槽。   目前比较活跃的社区仍旧是Github，除此以外也有一些不错的库散落在Google Code、SourceForge等地方。由于Github社区太过主流，这里主要介绍一下Github里面流行的iOS库。   首先整理了一份 Github上排名靠
  • html wlwmanifest.xml eoems htmlxml
    所谓优化wp_head()就是把从wp_head中移除不需要元素，同时也可以加快速度。 步骤： 加入到function.php remove_action('wp_head', 'wp_generator'); //wp-generator移除wordpress的版本号，本身blog的版本号没什么意义，但是如果让恶意玩家看到，可能会用官网公布的漏洞攻击blog remov
  • 浅谈Java定时器发展 hacksin java并发timer定时器
    java在jdk1.3中推出了定时器类Timer,而后在jdk1.5后由Dou Lea从新开发出了支持多线程的ScheduleThreadPoolExecutor，从后者的表现来看，可以考虑完全替代Timer了。 Timer与ScheduleThreadPoolExecutor对比： 1.    Timer始于jdk1.3,其原理是利用一个TimerTask数组当作队列
  • 移动端页面侧边导航滑入效果 ini jqueryWebhtml5cssjavascirpt
    效果体验：http://hovertree.com/texiao/mobile/2.htm可以使用移动设备浏览器查看效果。效果使用到jquery-2.1.4.min.js，该版本的jQuery库是用于支持HTML5的浏览器上，不再兼容IE8以前的浏览器，现在移动端浏览器一般都支持HTML5，所以使用该jQuery没问题。HTML文件代码： <!DOCTYPE html> <h
  • AspectJ+Javasist记录日志 kane_xie aspectjjavasist
    在项目中碰到这样一个需求，对一个服务类的每一个方法，在方法开始和结束的时候分别记录一条日志，内容包括方法名，参数名+参数值以及方法执行的时间。   @Override public String get(String key) { // long start = System.currentTimeMillis(); // System.out.println("Be
  • redis学习笔记 MJC410621 redisNoSQL
    1)nosql数据库主要由以下特点：非关系型的、分布式的、开源的、水平可扩展的。 1，处理超大量的数据 2，运行在便宜的PC服务器集群上， 3，击碎了性能瓶颈。 1)对数据高并发读写。 2)对海量数据的高效率存储和访问。 3)对数据的高扩展性和高可用性。 redis支持的类型： Sring 类型 set name lijie get name lijie set na
  • 使用redis实现分布式锁 qifeifei
    在多节点的系统中，如何实现分布式锁机制，其中用redis来实现是很好的方法之一，我们先来看一下jedis包中，有个类名BinaryJedis,它有个方法如下：   public Long setnx(final byte[] key, final byte[] value) { checkIsInMulti(); client.setnx(key, value); ret
  • BI并非万能，中层业务管理报表要另辟蹊径 张老师的菜 大数据BI商业智能信息化
           BI是商业智能的缩写，是可以帮助企业做出明智的业务经营决策的工具，其数据来源于各个业务系统，如ERP、CRM、SCM、进销存、HER、OA等。        BI系统不同于传统的管理信息系统，他号称是一个整体应用的解决方案，是融入管理思想的强大系统：有着系统整体的设计思想，支持对所有
  • 安装rvm后出现rvm not a function 或者ruby -v后提示没安装ruby的问题 wudixiaotie function
    1.在~/.bashrc最后加入 [[ -s "$HOME/.rvm/scripts/rvm" ]] && source "$HOME/.rvm/scripts/rvm"  2.重新启动terminal输入：   rvm use ruby-2.2.1 --default  把当前安装的ruby版本设为默
按字母分类： ABCDEFGHIJKLMNOPQRSTUVWXYZ其他